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PREFACE 


■~This  vtj n  complete  descriptions 

and  operating  instructions  for  a  collection  of  programs 
used  at  the  SPADATS  Center,  Ent  Air  Force  Base, 

Colorado  Springs,  Colorado^  The  collection  is  primarily 
useful  as  an  aid  to  analysts  in  their  task  of  positively 
identifying  objects  detected  in  space.  The  documentation 
does  not  purport  to  describe  a  total  system,  but  rather 
those  programs  which  were  deemed  necessary  to  comple¬ 
ment  and  support  an  already  existing  one.^! — - - — 

The  major  portion  of  these  programs  were  originally 
developed  under  the  guidance  and  direction  of  Dr.  Eberhard 
W.  Wahl.  Valuable  assistance  in  the  analysis  of  the  prob¬ 
lems  involved  was  also  rendered  by  Dr.  H.  Beat  Wackernagel, 
Mr.  Edward  F.  Casey,  Mr.  Laurence  W.  Ccihbert,  Mr*  Richard 
F.  Jenney( WRDC),  and  Mr.  Baruch  Rosenberg  (WRDC).  Three 
'■f  the  programs  (ASUM,  ISUM  and  SSUM)  were  developed  and 
written  by  the  Air  Force  in  Colorado  Springs. 
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1.  1  PSR,  Position  Situation  Report  (SITRPT) 

1 .  2  Function 

The  position  and  other  status  information  on  the  catalogued 
satellites  is  supplied  by  this  program.  For  a  specified  time  either 
or  both  of  the  following  types  of  reports  can  be  produced: 

a)  The  Position  Situation  Report. 

b)  The  Satellite  Situation  Report. 

The  Position  Situation  Report  shows  the  status  of  all  satellites 
at  a  particular  time  each  day.  This  report  is  issued  in  two  forms: 

1.  A  complete  printout  prepared  for  off-line  printing 
through  the  UBC. 

2.  A  truncated  version  which  can  be  punched  on  5-level 
paper  tape  for  teletype  transmission. 

Because  this  report  includes  information  on  all  known  objects,  it 
may  contain  classified  information.  The  reports  are  appropriately 
marked  automatically  by  the  computer  based  on  the  classification 
note  stored  in  the  Information  file  of  the  SEAI  tape.  See  block 
format  in  ISUM  writeup,  section  1-14. 

The  Satellite  Situation  Report  contains  only  the  information 
not  marked  as  classified  in  the  Information  File. 

1 . ^  Input 

In  addition  to  the  Schedule  Tape  control  cards,  this  program 
requires  at  least  one  parameter  card  (P  in  col.  80).  The  first  of 
these  parameter  cards  specifies  the  following  information: 

The  output  option  (col.  1): 

a)  0  =  Position  Situation  Report 

b)  1  =  Satellite  Situation  Report 

c)  2  =  Both  Reports 
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2.  The  time  at  which  the  report  is  desired: 

a)  Two  digits  for  hour  (cols.  2,  3) 

b)  Two  digits  for  minutes  (cols.  4,  5) 

c)  Two  digits  for  day  of  month  (cols.  9,  10) 

d)  Three  alphanumeric  digits  for  the  name  of 
the  month  (cols.  12  to  14) 

e) 5  Four  digits  for  the  year  (cols.  1  6  to  19) 

f)  Z  punch  to  signify  zebra  time  (col.  6) 

3.  The  Satellite  Situation  Report  output  code  (col.  23): 

a)  Blank  or  zero  (0)  will  suppress  print  of  debris. 

A  test  is  made  for  a  one  punch  in  character  two 
of  the  first  word  of  the  I-File 

b)  One  (1)  will  supply  information  on  all  satellites. 

4.  The  Position  Situation  Report  output  code  (col.  24): 

a)  Blank  or  zero  (0)  -  perigee  and  apogee  are 
printed  in  statute  miles. 

b)  One  (1)  -  perigee  and  apogee  in  kilometers. 

5.  Parameter  card  indicator  (P  in  col.  80) 

Additional  parameter  cards  can  be  included.  These  will  be 
treated  as  comment  cards  which  will  be  printed  immediately  follow¬ 
ing  Part  I  of  the  Satellite  Situation  Report. 

The  Element  file  and  Information  file  of  the  SEAI  tape  supply 
the  data  required  to  compute  the  position  information  requested. 

1 .  4  Output 

The  output  on  logical  eleven  (11)  contains  the  following  reports: 

1.  The  Position  Situation  Report  if  the  output  option  zero  (0) 
or  two  (2)  used. 

2.  The  Satellite  Situation  Report  if  the  output  option  one  (1) 
or  two  (2)  used. 

The  Position  Situation  Report  supplies  the  data  listed  below: 

a)  Time  and  classification  of  the  report. 

b)  Satellite  name,  number  and  element  number. 

c)  Latitude  and  longitude  west,  both  in  degrees,  at 
the  time  of  the  report. 
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d)  The  orbital  elements,  including  the  inclination  in 
degrees,  the  anomalistic  period  in  minutes,  and 
the  eccentricity. 

e)  The  apog^  .  and  perigee  in  statute  miles  or  kilometers, 
depending  on  the  output  code  used  in  col.  24. 

f)  The  revolution  number  at  the  time  of  the  report  and 
the  RAn,  Ljyj,  Tj^  of  this  revolution. 

g)  The  classification  of  the  satellite  -  this  field  will  be 
blank  if  the  satellite  is  unclassified. 

The  Satellite  Situation  Report  is  comprised  of  the  following 
information: 

Part  I  —  Objects  in  orbit  inclusive  or  exclusive  of 

debris  depending  on  the  code  used  in  col.  23 
of  the  first  parameter  card. 

a)  Time  of  Report 

b)  Satellite  name,  code  name,  source  and 
.  launch  date. 

c)  The  anomalistic  period  in  minutes,  the 
inclination  in  degrees,  the  apogee  and 
perigee  in  statute  miles. 

d)  Transmitting  frequencies,  if  any. 

e)  Comments  from  the  parameter  cards  which 
were  included  as  input  data,  such  as: 

1961  OMICRON  3-52  FIFTY  METAL  OBJECTS 
IN  PLANE  OF  61  OMICRON  1  AND 
61  OMICRON  2  ORBITS 

Part  II—  Object  removed  from  orbit. 

a)  Satellite  name,  code,  name  and  source. 

b)  Launch  date  and  decay  date. 

1.5  Proces  sing 

The  first  parameter  card  is  deciphered  in  the  CONBUF  area 
to  determine  the  time  requested  for  the  report.  The  ’’debris",  out¬ 
put,  and  code  switches  are  set  according  to  the  selection  made  on 
this  first  card. 
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The  elements  are  loaded  into  the  EBLOC  by  the  ELMLOD 
routine.  The  first  entry  of  the  I-File  is  read  and  matched  against 
the  first  element  in  the  EFILE.  If  the  two  files  are  in  phase,  the 
computations  are  initiated  for  the  time  requested.  The  appro¬ 
priate  report  or  reports  are  generated  according  to  the  internal 
switches  recorded.  These  switch  settings  are  a  result  of  the 
paths  selected  by  the  first  parameter  card. 

If  the  IFILE  and  EFILE  do  not  match,  a  test  is  made  on  the 
satellite  number.  A  satellite  number  in  the  EFILE  which  Is 
smaller  than  that  in  the  IFILE  results  in  the  comment  "NO  DATA 
IN  IFILE.  n  These  comparisons  and  the  comments  generated  by 
them  continue  until  both  files  are  again  in  phase  or  empty.  This 
procedure  is  followed  since  both  files  are  assumed  to  be  arranged 
in  ascending  order  by  the  satellite  number. 


Error  Messages 


1.  OVERFLOW  AT  JA  = _ _  Comment  will  be  printed 

on  off-line  output  and  an  exit  made  to  the  executive  program.  M 

2.  SUBROUTINE  ERROR  AT  JA  = _ This  will  be  ^ 

printed  on  off-line  output  when  an  error  return  is  made  from 
any  subroutine.  An  exit  will  be  made  to  the  executive  program. 

Formulation 


Initial  computations  from  input  elements  as 

,  2  ,  2  2 
p  =  hv  +  h,r  +  n7 
*o  xo  Yo  zo 


Wx  ■  »x0/V“l 


wy  =  hy0 

wz  =  cos  i  =  hz o/V^ 


sm 


i  =  tan 


L  2. 

1  =  Y  1  -  cos  1 
-1  sin  i 


cos  i 


computed  in  BEGIN: 


sin  =  Wx  /sin  i 
cos  SI  =  -Wy/sin  i 
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=  a0(1-eo) 

ke  L'so  =  kej''|3-5e0^-|cosi|(l-3/2e02)- 

.  2  ...  27  2.  \ 

sm  i*(  4 - 5—  eQ  )  j 

Uo  =  Lo  o  i£  Wz  ^  0 

o 

U0  =  L0  +  ft  0  if  Wz  <0 

o 

2.  Compute  t  =  (tj  -  tQ)  .  1440 

where  is  time  at  which  position  report  is  requested.  Enter 
XYZSB  to  get  position  at  time  t^ 

3.  Compute  0q  at  tQ: 

0G  =  0O  +  *  9856472»tQ  (Days)  +  360.  9856472»tQ  (fraction) 

4.  Enter  subroutine  SUBPT  to  get  sub- latitude  and  sub -longitude 
points: 


VE  =  tan  _1  (y  /x)  -  .  0043752691- 1  -  0G 

,  .  -i  r  uz  i 

L  (i-o  V1- v  J 

5.  Compute  remainder  of  output: 

PERIOD  =  2  ir/XN 
PERIGEE  =  a  (  1  -  e  )  -  1 
APOGEE  =  a  (1  +  e)-l 
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REV  =  REV 


«,+[T/Pn] 


where 


N 


IT  {l“  4  J2  ( ~p~  )  [3-  ~T  -  sin  i2  (4-— )]  | 
: - o  ~\  4e  J  ; 


e 


E  =  tan 
o 


•1  I"  Vl-e^  ayn 

t  e^  +  - 


mn 

—  TT  4- 

\ll-e  aVn 

-  E0  + 

1  +  a 

xn 

U)  = 

,  -1  1 

tan 

a 

Yn  ! 

-a  J 

xn 

ma 

=  Li  -  OJ- 

:  CL  :  -if  Wz  >  o,  + 

if  W  <  o 
z 

f 

=  ti  +  ‘ 

mn-ma 

|mn-Ma 

N 

1440  .  n  where 

ran 

=  +  £1 

[(  tn  -  tQ  )  *1440  -  t)] 

0G  =  0Go  +  .  9856472-tn  (days)  +  360.  9856472*tn  (fraction) 
ln  =  360  -  ran  +  eG  if  ran  >  eG 

LN  =  0G  '  if  <  9G 

ln  =  o  if  ran  =  eG 
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Location 

Symbol 

Meaning 

CCLAS 

1,  some  satellite  in  I-file  is  confidential 

0,  no  confidential  satellites 

CHAR 

Number  of  non-blank  characters  in 

transmitting  frequencies 

CLAS 

Classification  of  satellite,  from  I  file 

ELN 

Ln 

Longitude  at  node 

EMA 

M, 

a 

Mean  anomaly  at  report  time 

EMN 

M 

n 

Mean  anomaly  at  node 

ENDDT 

Decay  date 

ENDDTi 

Decay  date 

EOESW 

END  OF  ELEMENT  Switch  ^ 

0,  continue  reading  elements  from  EBLOC 
1,  all  elements  in  EBLOC  have  been 
processed 
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EOS 


ERJ 

ERJH 
F  LC1 

FLC2 

FNUM 

FSQ  f2 

FTNOTE 


HCLEM 

HCLAS 

HDCLASi 

HDCLAS2 

HELIO 


q 

HQ1  0 

HQ2 

HSAT1 

HSAT2 

JUNK 


LNCH 

LNCH1 

KILOM 


END  OF  SAVED  ELEMENTS  Switch 

0,  continues  reading  elements  from  SAVE  file 

1,  all  elements  from  SAVE  file  have  been  processed 

Contains  octal  address  of  location  where  subroutine 

or  overflow  error  occurred 

Lor  R  indicating  which  half  of  ERJ 

Fractional  part  of  rotation  rate  of  earth 

(deg/  solar  day^  =  .  9856472 

Rotation  rate  of  earth  (deg/solar  day)  360.9856472 
Number  of  lines  of  transmitting  frequencies  to 
be  printed 

f^  where  f  is  flattening  of  earth  =  .  112  381556  x  10  ^ 

Footnote  switch 

0,  do  not  print  footnote 

i,  print  footnote  to  give  units  of  heliocentric 
satellite  output 

Array  for  storage  of  elements  of  heliocentric 
satellites  from  I  file. 

Classification  of  satellite 

Contains  first  half  of  classification  heading 
Contains  second  half  of  classification  heading 
0,  elements  available  in  E  file 

1,  position  uncertain 

2,  heliocentric  satellite 

Perigee  distance 
Apogee  distance 

Year  part  of  object  name 
Object  name 

0,  or  space,  always  include  satellite  in  Satellite 
Situation  Report 

1,  do  not  include  in  Satellite  Situation  Report  unless 
output  Code  1  is  desired. 

Launch  Date 
Launch  Date 

0,  perigee  and  apogee  output  to  be  in  statute  miles 
1,  perigee  and  apogee  output  to  be  in  kilometers 
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LONGW  L 

OBJNO 

OPT 


OUTPUT 


PERIOD 

P 

a 

PGCNT 

PHI 

PINCL 

i 

RAN 

kan 

REV 

REV 

SATI 

SC  LAS 

SINDX 1*  . 

SSLAM 

SSLAT 

I  XE. 

-•  * 

*  TCLAS  ■ 

TDMON 

TFBUT 

TFCNT 

THGRN  0G 

TI 

TIF 

T1H1 

T1H2 

T1H3 


Longitude  (west)  of  subsatellite  point 
Satellite  number 
Output  options 

0,  output  is  a  Position  Situation  Report 

1,  output  is  a  Satellite  Situation  Report 

2,  output  is  both  reports 

Satellite  Situation  Report  output  code 

0,  or  space,  do  not  print  satellites  having  a  M1 

punch  in  character  2  of  the  first  word  in  I  file 

i,  print  all  satellites 

Anomalistic  period  (in  minutes) 

Page  count 

Latitude  of  sub  satellite  point 
Inclination 

Right  ascension  of  ascending  node 
Revolution  number 

Satellite  number  from  I  file  j 

1,  at  least  one  satellite  is  SECRET 

0,  no  SECRET  satellites 

Saves  index  register  1 

Longitude  (east)  of  subsatellite  point 

Latitude  of  sub  satellite  point 

1,  at  least  one  satellite  is  TOP  SECRET 

0,  no  TOP  SECRET  satellites 

Table  used  to  convert  month  name  to  month 


number 

Array  for  output  of  transmission  frequencies 
Count  of  number  of  characters  of  transmitting 
frequency  when  packed  for  output 
0  _  at  time  of  report 

VJ 

Time  of  report  in  days  since  1950 
Fractional  part  of  TI 
Output  buffers  for  time  of  report 
Output  buffers  for  time  of  report 
Output  buffers  for  time  of  report 
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T1W 

TN  t 

n 

TNI 

TNF 

TOI 

UCLAS 

UPESW 


UPISW 


UPSSW 

o 


PSR 


Integer  part  of  TI 

Time  of  node 

Time  of  node  (integer) 

Time  of  node  (fraction) 

Temporary,  used  in  computing  0 

Cr 

0,  no  unclassified  satellites 

.Is  at  least  one  unclassified  satellite 

E  file  switch 

0,  no  elements  in  E  file  for  previous  satellite  . 
in  I  file;  do  not  pick  up  more  elements 
i,  read  next  element  from  E  file 
I  file  switch 

0,  no  elements  in  I  file  for  previous  satellite 
from  E  file;  do  not  pickup  next-element  from  I  file 
1,  read  next  satellite  from  I  file. 

SAVE  file  switch  * 

0,  no  elements  in  SAVE  file  for  previous 
satellite;  do  not  pick  up  next  element  from 
SAVE  file. 

1,  read  next  element  from  SAVE  file 
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NXTELM)  Retrieves  Next  Element  Set  from  EBLOC 


A3  J  Compute  Variables 


© 


Get  Classification  and  Output  Option 


A7  )  Check  to  See  if  Satellite  has  Decayed 


PS  R 


Wolf  Reseorch  and  Development  Corporation 


KEY:. 


Compute  Variables  for  Reports 
aT')  Test  Output  Options 


Test  Switches 


EFILE  and  IFILE 


Test  Condition  of  Sat. 
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PSR 


pSHORTC 


FLAG  *  10 


FLAG  >  30 


X  Y  Z  3  B 


Compute 

Period 

Apogee 

Perigee 


Compute 


•  Compute 
Period 
Apogee  * 
Perigee 


r*<  /  0#,Put  \  no 
— — <  Requested./— 


in  KM  ? 


Convert  Apogee 
and  Perigee 
to  KM 


Compute  pn>rev, 
E0  >  M  n  \ 

ma>tw  ,rah,09^» 


XYZS8  )  Computes  Position  and 
J  Velocity 


Computes  Sub  satellite 
Point 


Test  for  Output  Option 


A6  )  Print  Situation  Report 
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2.  i  R E D U C T  ,  Nodal  Crossing  Reduction 

1.  2  F unction 

The  Nodal  Crossing  Reduction  Program,  hereafter  referred 
to  as  the  Reduction  Program,  reduce**  observations  to  the  last  nodal 
crossing;  computes  certain  differences  between  parameters  as 
computed  from  the  observation  and  as  computed  from  orbital  ele¬ 
ments;  may  compare  the  differences  against  predetermined  loler  *  •, 
anco  limits;  and  produces  results  in  printed  and/or  teletype  format. 

The  differences,'  or  residuals,  .may.be  used  by  the  analyst  . to  ■ 
determine  the  necessity  of  updating- existing  orbital  elements,  to” 
determine  new  elements  for  satellite  debris to  redefine  the  orbit 
of  a  “lost",  satellite,  or  to  identify  the.  observation.1 

The  observation  rnay  be  visual,  radar,  Baker -Nunn, ,  dopplcr , 
or  direction  finder.  The  fir.R  three  are  treated  by,  that  portion,  of 
the  Reduction  Program  known  as  the  General  Reduction,  and  the 
last  two" by  the  Doppler  Reduction  and  Direction  Finder  Reduction, 
respectively.  The  observation  types  may  be  intermixed  from 
different  sensors.,  or  for  different  satellites^ 

Table  2.  1  specifies  the  particular  residuals  computed  by  each 
of  the  sections  of  the  Reduction  Program. 

Table  2.  1 


Residuals  Computed -by  Various  Program  Sections 


Program  Section 

Time  Residual 

Right  Ascension 
Residual 

Height 

Residual 

Visual 

X 

X 

Radar 

X 

X 

X 

Baker  -Nunn 

X 

X 

1 

Doppler 

X 

Direction  Finder 

X 

1 

CopV 
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For  clarification  of  subsequent  sections  the  following 
definitions  are  made: 

A  predicted  quantity  (generally  indicated  with  a  prime)  is  the 
quantity  calculated  from  orbital  elements. 

A  computed  quantity  is  the  quantity  calculated  from  the  ob¬ 
servation. 

A  known  observation  is  a  sighting  which  has  been  identified 
by  the  sensor  as  a  particular  satellite. 

An  unknown  observation  (abbreviated  UO)  is  a  sighting  which 
has  not  been  identified  by  the  sensor. 

A  verified  observation  is  a  known  observation  which  may 
agree  with  the  predicted  position  of  the  specified  satellite. 

An  unverified  observation  is  a  known  observation  which  does 
not  agree  with  the  predicted  position  of  the  specified  satellite. 

A  tagged  observation  is  an  observation,  either  known  or  un¬ 
known,  which  does  agree  with  the  predicted  position  of  one  or  more 
satellites. 

An  untagged  observation  is  an- observation,  either  known  or 
unknown,  which  does  not  agree  with  the  predicted  position  of  any 
satellite. 

The  station  tape  is  a  binary  magnetic  tape  containing  station 
(sensor)  coordinates  for  specified  stations. 

The  residual  of  a  quantity  is  the  difference  between  the  com¬ 
puted  and  predicted  quantity. 

Input 

Input  data  may  be  divided  into  four  groups,  some  of  which  are 
optional.  The  four  are:  1)  the  switch  option  card,  2)  the  element 
lead  card  and  element  sets,  3)  the  station  lead  card  and  station  cards, 
and  4)  observation  lead  card(s)  and  observations. 
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2.  3.  1  Switch  Option  Card 

The  switch  option  card  sets  the  program  switches.  Setting  of 
a  switch  is  indicated  by  any  non -zero  numeric  punch  in  the  appropri¬ 
ate  card  column.  The  switches  and  their  functions  are  indicated  in 
Table  2.  2. 

Table  2.  2 


Program  Switches  and  Their  Functions 


Switch 

Name 

Card 

Column 

Function,  if  Set 

SSI 

1 

Inhibits  the  use  of  the  station  tape  (if  set,  the 
station  data  must  then  be  supplied  as  card  input). 

SS3 

3 

Inhibits  the  requirement  for  an  interim  tape  and 
also  eliminates  any  check  of  residuals  vs. 
tolerances. 

SS8 

8 

Causes  all  observations  to  be  processed  as 
unknowns,  i.  e.  ,  all  are  reduced  against  all 
available  element  sets.  Known  satellite  numbers 
are  retained  for  reference.  Tolerance  tests 
will  be  made  unless  SS3  is  set. 

SS9 

9 

Causes  teletype  formats  to  be  used  in  preparation 
for  the  TELTYP  Program. 

SS10 

10 

! 

! 

Eliminates  the  rereduction,  with  open  tolerance 
gates,  of  untagged  observations. 

SS11 

11 

Uses  the  perigee  distance  from  the  element  set; 
if  not  set,  perigee  distance  is  computed. 

2.  3.  2  Element  Lead  and  Element  Cards 


The  standard  element  sets  required  for  reducing  known  obser¬ 
vations,  as  well  as'the  sets  considered  necessary  in  attempting  to 
tag  unknowns,  must  be  included  as  a  part  of  the  input  deck.  The 
element  cards  must  be  preceded  by  the  element  lead  card,  identified 
by  having  only  a  seven  (7)  punch  in  card  column  8.  At  present,  no 
more  than  250  element  sets  are  permitted.  Reading  of  the  elements 
is  terminated  by  either  a  station  or  an  observation  lead  card. 
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2.  3.  3  Station  Lead  and  Station  Cards 

To  reduce  observations,  the  geographic  coordinates  of  the 
observing  station  must  be  available.  The  coordinates  may  be  read 
from  the  station  tape  (if  program  switch  1  is  not  set)  and/or  from 
standard  station  cards.  Each  group  of  station  cards  must  be  pre¬ 
ceded  by  the  station  lead  card,  identified  by  having  only  an  eight  (8) 
punch  in  card  column  8.  At  present,  no  more  than  750  stations  may 
be  used. 

2.  3.  4  Observation  Lead  and  Observation  Cards 

The  observational  data,  the  primary  input  to  the  Reduction 
Program,  must  be  in  the  standard  observation  format.  Each 
group  of  observations  must  be  preceded  by  an  observation  lead  card, 
identified  by  the  nine  (9)  punch  in  column  8.  Column  7  of  the  lead 
card  is  also  used  to  specify  the  tolerances  to  be  used  by  the  program, 
where  applicable.  Table  2,  3  spec!  *  i  the  codes  and  their  corre¬ 
sponding  values.  Lead  cards  to  change  the  tolerances  may  precede 
observations  anywhere  in  the  observation  card  deck.  There  is  no 
limit  to  the  number  of  observations  which  may  be  processed,  since 
they  are  processed  individually. 

A  blank  observation  card  will  terminate  the  reading  of  the 
preceding  group  of  observational  data.  A  card  with  only  a  non¬ 
zero  numeric  punch  in  column  79  will  terminate  the  program. 

Table  2.  3 


Tolerance  Codes  and  Corresponding  Values 


Code 

Time  (days) 

Right  Ascension 
(degrees) 

Height  (km) 

Blank] 

0  J 

.  002 

20 

200 

1 

1 

5 

500 

2 

.  003 

360 

10000 

3 

.  002 

360 

10000 

4 

.  001 

360 

10000 

5 

.  003 

5 

300 

_6 

I  05 

2.  5 

200 
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2.  4.  1 


2.  4.  2. 


Output 

Reduction  results  may  be  obtained  in  the  form  of 
teletype  paper  tape  and/or  printed  output,  depending  upon  the 
setting  of  program  switch  SS9  (cf.  Table  2.  2).  Headings  are 
also  a  function  of  the  teletype  option.  The  output  consists  of  the 
satellite  inventory,  output  preliminary  to  the  results,,  and  the 
results  themselves.  ■  \ 


Satellite  Inventory 


ry  *.  *  /  *  '• '  '  **  >*■*..,**  ;  ‘  *  V 

.■  :  *'*■  4  f .  ■  r-r  Jfc*  ../* 

"  “a  ii  sting,,  of  the*  satellite  -arid,  element  i 

lowing  -the ^termination;  oLthW reading  ' v/ 


The  satellite  inventory 


numbers  used,  is ’written  following 
of  element  sets 
INVENTORY  FOLLOWS 


The  satellite 
seven  to.  the 


Output  Preliminary. to  R e duction* Re s ult s it  "  k„C.* 

—t~ — — ...  : 

'  ■'  '  ‘  "  ■  ,  ■  ■■  .  ..  '«*«?,*•  *  ••  4  ...  'ii  **.,  •*•.■‘’1  VvjJL  .‘‘i.  ’i"  **•  *  '.'5.*.  -.".tf- 

.  h-vi- s  •  »  *i.  ('•.ijc  Vi  *  .'W  ,  ■  ‘  .  -  .. 

TV,n  in  p<  r  pcnlts  \x/  m  r  n  * 


The 

•  ■  '‘IT.''/' 

will  follow; 


L in e 2-K . ,  E po ch *  r  e  vo lut ion  .numb  e r , / e p 6 ch ] t im e  i'  n o da  1  period 

■*.  .  /*-  ••r  ■  • '  .  ...  A,-.*-"  *'*• 

*  *  *f*  ’  ^  ■  P**  ^  *  *1?  *'  (>  ^  /V  -*  *  *1;  v!*^,  *  «  '  *  '  »(  »  '**,  / 

"•  •"*  (days) its:  fir  st  ancl'.orie  . half,  of  its,  :secdnd  deriva- 

V  \*  S'**,;. , 

•  •  .**  v  ‘■’••tive  with- respect: to  time;',  the  semi-major  axis,  and 

eccentricity  ..  •'  ■  ;  *■'  ’  ■*  ■  •  '  . 

Line  3.  Right  ascension  o£;the' ascending  node,  its  first  and 

one  half  of  its  second  derivative  with  respect  to. time, 
nodal  period  (minutes),  and  inclination 

Line  4.  Blank 

Line  5.  The  tolerances  (time,  right  ascension  of  the  ascend¬ 
ing  node,  and  height) 
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A  summary  of  the  five  lines  in  symbolic  notation 
follows : 

Satellite  No. 

N  t  PXT  c  d  a  c 

o  N 

f2  £2  f2  co  0) .  oo  P  i 

Nm 

At  ARA  AM 

t  ,  t  t 

2.4.3  Results  for  Tagged  or  Known  Obnervations  * 

The  output  format  and  quantities  calculated  depend  upon  the 
teletype  option  and. upon  the'type  of  observation.  If  teletype  output 
is  desired,  all  headings  are  omitted  and  the  output  is  placed  in  two 
lines.  However,  the .  quantities  '  contained  in  the  two  lines  are  identi¬ 
cal  with  those  which  would  have  been  printed  in  one  line,  had  the 
teletype  option  not  been  selected.  In  the  following  subsections  the 
de  scription  will  apply,  to  a  case’ in  which  teletype  output  is  not 
requested.  .  R  /  '  .A' 

As  noted  above,  the  headings  and  quantities  computed  are  a 
,  function  of. the  observation  type,  Each  heading  is  described  below. 
The  headings  will  be  printed  each  time  a  different  group  of 
observation  type  is  encountered;  that  is,  each  time  the  observation 

type  requires  th  •  use  of  a  d i f f e r  c  n  t\  s  e  c  t i o n Vq f -•  the  program.,  . 

2.4.  3.  1  Output  Common  to -All  Observation  -  Types,  , 

The  output  from  each  of.thr,ee;pbrtiohs  of  the/Reduction  Pro¬ 
gram  begins  with  two'  common  •quantities’,  the  identification,  ID, 
and  the  epoch  revolution,  ,N.  The  identification  is  composed  of  two 
eight  character  words  which  may  be  symbolically  represented  by 


SATYMMDD 

HIIMMSSs. 

where 

SAT 

= 

satellite  number 

Y 

= 

last  digit  of  the  year 

MM 

month  of  the  year 

DD 

day  of  the  month 
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HH  = 

hour  of  the  day 

MM  = 

minutes  of  the  day 

SS  = 

seconds  of  the  day 

ss  = 

hundredths  of  seconds 

If  the  teletype  ending  sentinel,  $#  appears  at  the  end  of  any 
line  of  output,  the  observation  time  precedes  epoch  by  more  than 
four  days. 

2,  4.  3.  2  Dimensions  of  the  Output  Quantities 

Unless  otherwise  indicated  the  dimensions  of  the  output 
quantities  are  in  time  in  days,  distance  in  kilometers,  and  angular 
measure  in  degrees. 

2.  4.  3.  3  Output  from  the  General  Reduction  Program 

Following  the  epoch  revolution  number  are  the  argument  of 
■  latitude,  Uf  of  the  satellite;  computed  time  of  nodal  crossing, 

■  ,  *7.  ..  T.SUB  N;  its  residual,  DELTA  T;  the  latitude,  PHI  S,  and  longitude, 
.  L  S,  of  the  sub -satellite  point;  the  computed  right  ascension  of  the 
:  ascending  node,  RA  N;  its  residual,  DEL  RA;  the  computed  satel¬ 
lite  height,  H(KM);  its  residual,  DEL  H;  observation  type,  TYPE; 
element  number,  ELEM;  and  station  number,  STA.  If  the  observa¬ 
tion  type  is  visual,  VIS,  or  Baker -Nunn,  B -N ,  the  height  residual 
will  appear  as  0-0.  If  the  type  is  radar,  RDR,  the  computed 
quantity  will  be  printed. 

2.  4.  3.  4  Output  from  the  Doppler  Reduction  Program 

Following  the  epoch  revolution  number  are  the  computed  time 
of  nodal  crossing,  T  SUB  N;  its  residual,  DELTA  T;  the  great 
circle  distance,  D,  in  nautical  miles  from  the  station  to  the  eub- 
satellite  point;  the  elevation  angle,  H;  the  slant  range,  S;  the 
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element  number,  ELEM;  and  the  station  number,  SAT.  The  title 
(DOPPLER)  is  appended  to  the  heading,  or  in  case  the  teletype 
option  is  selected,  the  symbol,  DOP,  follows  the  station  number. 

2.  4.  3.  5  Output  from  the  Direction  Finder  Program 

Following  the  epoch  revolution  number  are  the  computed 
time  of  nodal  crossing,  T  SUB  N;  its  residual,  DELTA  T;  the 
slant  range,  S;  the  computed  satellite  height,  H(KM);  the  element 
number,  ELEM;  and  the  station  number,  ST  A.  The  comment 
(DIR  FINDER)  is  appended  to  the  heading,  or  in  case  the  teletype 
option  is  selected,  the  symbol  DF  follows  the  station  number. 

2.  4.  3.  6  Observation  Comments 

The  observation  comments  which  may  appear  in  the  printed 
output  and  their  explanations  are  given  below.  Each  observation 
comment  is  preceded  by  the  16 -digit  observation  identification. 

Observation  comments  ( 1 )  —  (3)  may  be  printed  for  both  known 
and  unknown  observations. 

(1)  UNDEFINED  OBSERVATION  (2).  Illegal  equipment  type 
specified. 

(2)  NO  STORED  COORDINATES  (2).  The  station  coordinates 
of  the  observing  station  are  not  available. 

(3)  IMPROPERLY  LOGGED.  An  error  exists  in  the  observa¬ 
tion,  e.  g.  ,  hours  greater  than  24,  an  elevation  angle 
greater  than  90  degrees,  etc. 

Observation  comments  (4) -(13)  may  be  printed  for  known 
observations  only.  Each  message  is  followed  by  the  station  number. 

(4)  NO  ELEMENTS  IN  SYSTEM  (1).  The  elements  corre¬ 
sponding  to  the  satellite  designated  in  the  observation 
have  not  been  read. 


i-2-8 


Wolf  Research  and  Development  Corporation 


REDUCT 


(5)  Q PRIME  LESS  THAN  OR  EQUAL  TO  ONE  (1).  The 
computed  perigee  distance  is  less  than  or  equal  to  one 
earth  radius. 

(6)  DID  NOT  MEET  RESIDUAL  TOLERANCES  (3).  The  ob¬ 
servation  did  not  meet  the  specified  residual  tolerances. 

(7)  BAKER -NUNN  OBS  W/+RA  (5).  An  observation  is 
encountered  in  the  General  Reduction  Program  with  an 
equipment  type  that  indicates  Baker -Nunn,  but  the  ob¬ 
servation  does  not  have  the  required  minus  over  punch  in 
column  31  of  the  observation  card.  If  the  observation  is 

unknown,  it  becomes  an  untagged  UO. 

If  the  observation  is  unknown,  it  becomes  an  untagged  UO. 

(8)  ELEVATION  NEGATIVE  (7).  The  elevation  computed 
from  the  declination  by  the  General  Reduction  Program 
is  negative.  If  an  unknown  observation,  it  becomes  an 
UNTAGGED  UO. 

(9)  PHI  S  GREATER  THAN  I  (8).  The  computed  sub -satellite 
latitude  exceeds  the  inclination. 

(10)  DF  AZ  NEGATIVE  (6).  A  Direction  Finder  observation 
has  a  negative  azim.uth. 

(11)  DF  ELEVATION  NEGATIVE  (8).  A  Direction  Finder 
observation  has  a  negative  computed  elevation. 

(12)  NON -CONVERGENT  OBS  (9).  The  computation  of  the 
satellite  latitude  does  not  converge  within  the  specified 
number  of  iterations. 

(13)  SLANT  RANGE  (ZERO)  (0).  An  observation  with  a  zero 
slant  range  has  been  encountered  by  the  General  Reduction 
Program  radar  portion.  If  the  observation  is  unknown, 

it  becomes  an  untagged  UO. 
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(14)  UNTAGGED  UO.  An  unknown  observation  has  been 
reduced  against  all  the  element  sets  and  remains  un- 
tagged  within  the  specified  tolerances.  If  input  options 
specify,  the  observation  will  be  written  on  the  interim 
tape  and  rereduced  with  large  tolerances. 

2.  4.  3.  7  Miscellaneous  Printed  Output 

The  various  comments  which  may  .appear  ,  in  the  printed 
matter  and  their  explanations  follow.  .  , 

(1)  PN  MISSING  SO  PA  IJSED  FOR  SAT  XXX  ELEM  XXX 

The  nodal  period  at  epoch  is  missing  from  the  sixth  card 
of  a  seven  card  set.  .  The  anomalistic  period  has  been  used 
in  its  place. 

(2)  SATELLITE  XXXX  CARD  XXX  OUT  OF  ORDER 

An  element  card  is  not  in  correct  sequence,  or  an 
'  extraneous  card  is  contained  in  the  element  sets.  The.  ele- 
ments  for  the  particular  satellite  .will  not  be  stored  in  com-  ' 
■puter  memory,  hence' are  unavailable. 

(3)  .UNTAGGED  UOS  REDUCED  W/O  TOLERANCES  . 

All  observations  which  follow  have  previously- appeared 
as  untagged  UO*  s,  and  have. now  been,  rereduced  with  large 
•  tolerances . •  .V';'  ;*;!*. 

(4)  END  OF  RUN' 

.  All  observations  have  been  reduced  with  a  specified 
tolerance.  Any  results  which  follow  have  been  reduced  with 
different  tolerances.’ 

(5)  UO  S  FOLLOW 

All  observations  which  follow  on  the  page  did  not  corres¬ 
pond  to  any  satellite,  the  elements  of  which  were  successfully 
stored  in  computer  memory. 
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(6)  UNK  ##*****##** 


The  next  observation  is  an  unknown.  The  message 
number  is  given.  If  the  observation  was  a  known  observa¬ 
tion  which  was  treated  as  an  unknown,  the  satellite  number 
is  also  given. 

2.  4.  3.  8  Flexowriter  Output 

The  messages  which  may  appear  on  the  flexowriter,’  and  their 
explanations  follow.  ,  i  '** '  *.  •  : 


(1)  SATELLITE  XXXX  CARD  XXX  OUT  OF  ORDER 

An  element  card  is  not  in,  correct  sequence,  or  an  .  .. 
extraneous  card  is  contained  in  the  element"  sets.-  Th.eele-.v 
.  ments  for  the  particular  satellite  will  not  be  stored  in  computer 
’  memory,  hence  are  unavailable.  \  • 

(2)  MOUNT  RIGHT  STATION  TAPE 

The  station  tape  is  not  available  to  the  program.-  The 
program  awaits  the  stop-go  option.  V >t 

(3)  ILLEGAL  LEAD  CARD  SKIPPED  *  ;  ;y  -\  X’ 


An  illegal  lead  card  (cf.  Sec.  2.  3)  is  present- in  the 
input  deck.  ..  The  program  continues  according  to -the  last1:*’ 
valid  lead  card..  .*■  .  '• 


(4)  MOUNT  STATION  TAPE. ON  7  •  • 

The  program  is  ready. to  .run,  .but.a  stpp-go  option  is 
provided  in  case  the  station  tape  is  required.  . 

(5)  REMOVE  STATION  *  TAPE^.U7  ;*” 

The  program  run  is  complete,  but  a  stop-go  option  is 
provided  to  give  time  to  remove  the  station  tape. 


2.  5  Processing 


The  prograrn  accomplishes  its  function  of  reducing  observa¬ 
tional  data  to  the  last  nodal  crossing,  one  observation  at  a  time. 
However,  certain  preliminary  operations  must  be  performed  prior 
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to  operating  on  the  first  observation,  and  as  circumstances  require, 
prior  to  operating  on  subsequent  observations. 

2.  5.  1  Preliminary  Operations 

The  preliminary  operations  are  initialization  of  various  pro¬ 
gram  switches,  examination  of  switch  options,  reading  of  station 
coordinates  from  the  station  tape,  reading  of  satellite  elements 
from  cards,  reading  of  station  data  from  cards,  and  the  reading  of 
the  first  observation  lead  card. 

2.  5.  1.  1  Initialization  of  Program  Switches 

Certain  switches  which  will  control  the  path  of  the  program 
are  initialized  to  neutral  settings. 

2.  5.-.I.  2  Reading  of  Switch  Option 

The  several  program  switch  settings  are  read  from  the 
switch  option  card  (cf.  Sec.  2.  3.  1).  These  settings  determine, 

■  among  other  things,  whether  or  not  the  station  tape  is  to  be  read 
and  the  interim  tape  rewound. 

2.  5.  1.  3  .  Reading  the  Station  Tape 

■  If  switch  SSI  is  set  the  station  tape  is  examined;  and  if  it  is 
identified  as  the  station  tape,  the  values  of  station  number,  latitude, 
longitude,  and  height  are  read  into  the  appropriate  array.  If  the 
identification  test  fails,  a  STOP-GO  option  is  provided  to  allow 
the  computer  operator  to  mount  the  correct  tape.  GO  causes  the 
program  to  examine  the  newly  mounted  tape  for  the  proper  identi¬ 
fication.  STOP  causes  the  program  to  return  control  to  the 
executive  routine. 

2.  5.  1.  4  Reading  the  Element  Sets 

The  element  sets  are  generally  read  as  a  single  group  by 
the  subroutine  ELRED.  The  program  logic  also  permits  their 
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being  read  in  separate  groups,  providing  they  are  identified  by 
an  element  lead  card.  Certain  validity  checks  are  made  upon  each 
element  set.  If  no  gross  errors  exist,  the  elements  are  stored  in 
the  element  array  for  future  use.  If  errors  do  exist,  appropriate 
error  messages  are  generated  and  the  element  set  is  otherwise 
ignored. 

Reading  of  element  sets  is  terminated  by  either  a  station 
lead  card  or  an  observation  lead  card.  Termination  of  reading 
causes  the  satellite  inventory,  a  listing  of  those  satellites  whose 
elements  were  successfully  read,  to  be  generated  as  the  first  out¬ 
put  of  the  program. 

2.  5.  1.  5  Reading  of  Station  Data  from  Cards 

If  a  station  lead  card  is  encountered  during  the  running  of 
the  program,  the  data  from  the  station  card  or  cards  which  follow 
the  lead  card  are  stored  in  the  station  data  array.  Reading  of  the 
station  cards  is  terminated  by  either  an  element  lead  card  or  an 
observation  lead  card. 

2.  5,  1,  6  Reading  of  an  Observation  Eead  Card 

Each  observation  or  group  of  observations  must  be  preceded 
by  an  observation  lead  card,  which  also  specifies  the  tolerances 
to  be  used,  where  applicable,  to  cause  the  tagging  of  unknown 
observations.  Table  2.  3  specifies  the  codes  used  in  card  column 
8  of  the  lead  card  and  the  corresponding  values  of  the  tolerances. 
Following  the  reading  of  the  first  observation  lead  card  the  pro¬ 
cessing  of  observations  can  begin. 

2.  5.  2  Preliminary  Processing  for  all  Observations 

The  observations  are  read  and  processed  individually.  Prior 
to  the  actual  reduction  calculations,  tests  are  made  for  the  validity 
of  the  observation,  the  station  coordinates  are  retrieved,  the 
appropriate  elements  are  located  and  the  observation  type 
determined. 
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2.  5.  2.  1  Testing  of  the  Observation 

Certain  fields  from  the  observation  card  are  checked  for 
validity.  These  fields  are  month,  day,  hour,  minute,  second, 
elevation  angle,  and  azimuth  angle.  An  error  in  any  one  of  the 
fields  will  cause  the  rejection  of  the  observation  with  the  appropri¬ 
ate  comment  (cf.  Sec.  2.  4.  2.  6  (3)).  The  program  proceeds  to 
read  another  observation  card. 

2.  5.  2.  2  Retrieval  of  Station  Coordinates 

If  the  several  fields  of  the  observation  card  contain  no  illegal 
values,  the  station  number  from  the  observation  is  compared  to 
that  from  the  previous  observation.  If  the  two  numbers  do  not 
agree,  the  station  data  array  is  searched  for  the  current  station 
number.  If  the  station  number  is  found,  the  station  latitude,  long¬ 
itude,  and  height  are  retrieved,  and  station  dependent  quantities 
are  computed.  If  the  current  station  number  is  not  found  in  the 
station  data  array,  the  observation  will  be  rejected  with  the 
appropriate  comment  (cf.  Sec.  2.  4.  3.6  (2)).  The  program  proceeds 
to  read  another  observation. 

If  the  two  station  numbers  do  agree,  the  latitude  and  longi¬ 
tude  are  examined  for  zero  which  would  indicate  that  the  station 
coordinates  were  not  previously  found.  The  observation  is  then 
rejected  with  the  appropriate  comment. 

2.  5.  2.  3  Retrieval  of  Satellite  Elements 

If  the  observation  is  a  known  observation,  the  satellite 
number  is  compared  to  that  of  the  previous  satellite.  If  they  agree, 
then  the  elements  have  already  been  retrieved  and  no  search  of  the 
element  array  is  necessary.  If  the  satellite  number  is  not  the  same 
as  that  of  the  previous  satellite,  the  element  array  is  searched  via 
subroutine  ELCAL3.  If  the  search  is  successful  the  nodal  elements 
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are  printed  (cf.  Sec.  2.  4.  2).  If  the  elements  are  not  found  the 
observation  is  rejected  with  the  appropriate  comment  (cf.  Sec. 

2.  4.  3.  6  (4)).  The  program  proceeds  to  read  another  observation. 

If  the  observation  is  an  unknown  observation,  then  the  sub¬ 
routine  ELCAL3  will  sequentially  retrieve  the  elements  from  the 
element  array  until  the  observation  has  been  reduced  against  all 
elements. 

Subsequent  to  the.  retrieval  of  the  elements,  perigee  distance 
for  the  revolution  at  the  time  of  the  observation  is  computed.  If 
perigee  distance  is  less  than  one  earth  radius,  computations  will 
either  cease  in  the  case  of  a  known  observation,  or  continue  with 
the  next  element  set  for  an  unknown  observation.  The  appropriate 
comment  (cf.  Sec.  2.  4.  3.  6  (5))  is  printed  for  the  known  observa¬ 
tion,  and  another  observation  is  read. 

If  the  perigee  distance  computation  is  satisfactory,  the  actual 
reduction  computation  is  ready  to  be  made  on  the  basis  of  the 
observation  type. 

2.  5.  2.  4  Determination- of  Observation  Type 

The  observation  type,  a  part  of  the  observation  itself,  is 
used  to  determine  which  of  the  .three  subsections  of  the  program  is 
to  be  used  for  the  reduction  computations.  An  illegal  observation 
type  will  'cause  the  rejection  of  the  observation  with  the  appropriate 
comment  (cf.  ■  Sec.  2.  4.  3.  6  (1)). 

2.  5.  3  Processing  With  the  General  Sighting  Routine 

The  General  Sighting  program  processes  only  observations 
in  which  azimuth  and  elevation  angles,  or  right  ascension  and 
declination  are  given.  Slant  range  may  also  be  utilized.  The 
general  observation  types  which  fulfill  this  requirement  are 

visual,  radar  and  Baker -Nunn  camera  observations. 
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2.  5.  3.  1  Special  Processing  of  Visual  Observations 

Visual  observations  may  be  either  azimuth  and  elevation 
angles  or  right  ascension  and  declination.  If  the  right  ascension 
and  declination  are  given,  they  are  converted  to  azimuth  and  ele¬ 
vation  angles.  A  negative  elevation  angle  computed  from  a  known 
observation  causes  an  error  message  (cf.  Sec.  2.4.  3.6  (8))  to 
be  generated  and  the  program  proceeds  to  process  the  next  obser-  . 
vation.  If  the  observation  is  unknown,  it  becomes  an  untagged  UO. 
Computation  of  a  positive  elevation  angle  causes  processing  to 
continue  as  indicated  in  Sec.  2.  5.  3.  3. 

2.5.3J2  S£  ecial  Processing  of  Baker -Nunn  Camera  Observations 

Baker -Nunn  camera  observations  must  have  right  ascension  , 
and  declination  given.  These  are  converted  to  azimuth  and  eleva¬ 
tion  angles  and  the  processing  continues  as  indicated  in  Sec.  2.  5.  3.  3. 
If  the  overpunch  signifying  right  ascension  and  declination  is  missing, 
an  error  message  (cf.  Sec.  2.  4.  3.  6  (7))  is  generated  for  a  known 
observation  or  the  unknown  observation  is  made  an  untagged  UO. 

In  either  case,  the  program  proceeds  to  the  next  observation. 

2.  5.  3,  3  Common  Processing  of  Visual  and  Baker -Nunn  Camera  Observations 

Neither  visual  nor  Baker-Nunn  camera  observations  have  any 
range  information.  For  this  reason  an  iterative  procedure,  is  used 
.  to  determine  the  sub -satellite  position.  The  station1  s  latitude 

and  sidereal  time  are  taken  as  first  approximations  to  the  satellite1  s 
latitude  and  right  ascension,,  respectively,  on  the  assumption  that 
the  satellite  is  close  to  the  station.  Failure  of  the  calculations  to 
converge  causes  an  error  message  (cf.  Sec.  2.  4.  3.  6  (12))  to  be 
generated  for  known  observations.  The  program  proceeds  to  the 
next  observation  for  the  known  observation  or  to  the  next  element 
set  for  an  unknown  observation.  If  the  iteration  produces  the 
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satellite  latitude  within  the  specified  limit,  the  latitude  is  checked 
against  the  inclination  angle.  An  unsatisfactory  result  causes  an 
error  message  (cf.  Sec.  2.  4.  3.  6  (9))  to  be  generated  for  a  known 
observation  and  the  program  proceeds  to  the  next  observation.  For 
an  unknown  observation  the  next  element  set  is  selected. 

If  the  computed  latitude  can  be  on  the  orbital  plane,  processing 
continues  as  indicated  in  Sec.  2.  5.  3.  5. 

2.  5,  3. .4  Special  Processing  of  Radar  Observations 

The  examination  of  the  azimuth  and  elevation  angle  field  for 
a  radar  observation  is  identical  to  that  described  for  a  visual 
observation  (cf.  Sec.  2.  5.  3,  1).  However,  radar  observations 
include  a  range  measurement,  and  this  is  used  to  determine  the  sub¬ 
satellite  position.  An  illegal  range,  i.  e,  ,  negative,  causes  the 
appropriate  message  (cf.  Sec.  2.  4.  3.  6  (13))  to  be  generated  for 
.  a  known  observation,  and  causes  an  unknown  observation  to  become 
an  untagged  UO.  In  either  case,  the  program  proceeds  to  process 
the  next  observation. 

If  the  range  is  valid,  the  satellite' s  latitude  and  right  ascen¬ 
sion  are  computed.  The  latitude  is  compared  with  the  inclination 
angle.  If  the  test  is  satisfactory,  the  height  residual  is  computed. 
Processing  then  continues  as  in  Sec.  2.  5.  3.  5.  If  not, an  error 
message  (cf.  Sec.  2.  4.  3.  6  (9))  is  generated  for  a  known  observa¬ 
tion,  and  the  program  proceeds  to  process  the  next  observation. 

If  the  observation  is  unknown,  the  program  proceeds  to  the  next 
element  set. 

2.  5.  3.  5  Common  Processing  of  all  General  Sighting  Observations 

The  longitude  of  the  satellite,  right  ascension  of  the  node, 
the  residuals  of  time  and  right  ascension  of  the  node  are  computed 
for  all  general  sighting  observations.  At  this  point  the  observation 
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has  passed  the  various  gross  tests  and  the  residuals,  be  they 
large  or  small,  have  been  computed*  The  setting  of  switch 
option  SS3  determines  whether  or  not  the  residuals  for  an 
unknown  observation  should  be  compared  with  the  tolerances.  If 
the  switch  is  not  set  and  the  observation  is  unknown,  the  compari¬ 
son  is  made.  Failing  the  comparison  causes  the  program  to  select 
the  next  element  set;  passing  causes  the  observation  to  be  tagged. 

If  the  switch  SS3  is  set,  the  tolerances  are  ignored.  The  observation 
and  the  reduction  results  are  then  output  for  printing.  The  program 
proceeds  to  process  the  next  observation  on  the  same  observation 
with  a  new  element  set,  depending  upon  whether  or  not  the  current 
observation  is  known  or  unknown. 

2.  5.  4  Processing  With  the  Doppler  Routine 

The  Doppler  portion  of  the  program  processes  passive  track 
Doppler  observations  and  Fence  observations  in  which  range  rate 
is  the  only  information  available.  Consequently,  only  the  time 
residual  is  computed. 

Preliminary  calculations  concerning  the  relative  position  of 
the  ascending  node  and  the  station  are  made  to  determine  certain 
constants  for  subsequent  calculations.  The  argument  of  latitude, 
true  anomaly,  eccentric  anomaly,  and  mean  anomaly  of  the  satel¬ 
lite  are  intermediate  quantities  used  in  determining  the  time 
residual,  the  elevation  angle  and  the  slant  range.  The  setting  of 
switch  SS3  determines  whether  or  not  the  time  residual  for  an 
unknown  observation  should  be  compared  with  the  time  tolerance. 

2.  5.  5  Processing  With  the  Direction  Finder  Routine 

The  Direction  Finder  portion  of  the  program  processes 
observations  in  which  the  azimuth  angle  of  the  closest  approach  is 
given.  For  this  reason  only  the  time  residual  is  computed. 
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The  observation  will  be  rejected  with  the  appropriate 
message  (cf.  Sec.  2.  4.  3.  6  (11))  if  the  azimuth  is  negative.  If 
it  is  positive  the  time  residual,  the  elevation  angle  and  the  slant 
range  are  computed.  A  negative  elevation  angle  will  cause  an 
error  message  (cf.  Sec.  2.  4.  3.  6  (10))  to  be  generated  for  a 
known  observation.  The  program  proceeds  to  the  next  observation 
or  the  next  element  set  depending  upon  whether  the  negative 
elevation  angle  was  computed  from  a  known  or  an  unknown  observa¬ 
tion. 

If  the  elevation  angle  is  positive,  the  setting  of  switch  SS3 
determines  whether  or  not  the  time  residual  for  an  unknown 
observation  should  be  compared  with  the  time  tolerance.  If  the 
comparison  is  made  and  the  residual  exceeds  the  tolerance,  the 
program  proceeds  to  select  the  next  element  set.  Otherwise  the 
observation  is  tagged  and  the  reduction  results  for  both  the  tagged 
unknown  or  known  observation  are  output  for  printing.  The  pro¬ 
gram  proceeds  to  process  the  next  observation  or  the  same  obser¬ 
vation  with  a  new  element  set  depending  upon  whether  or  not  the 
current  observation  is  known  or  unknown. 

2.  5.  6  Optional  Reprocessing  of  Untagged  Unknowns 

Unknown  observations  which  have  failed  to  be  tagged  may  be 
reprocessed  with  large  tolerances,  depending  upon  the  setting  of 

switches  SS3  or  SS10.  If  neither  are  set,  unknown  observations 
which  have  not  been  tagged  are  written  on  the  interim  tape  follow¬ 
ing  the  processing  with  the  last  available  element  set. 

After  all  observations  have  been  initially  processed,  the 
tolerances  are  set  to  large  values.  The  observations  are  then 
read  from  the  interim  tape,  one  at  a  time,  and  reprocessed  with 
all  element  sets. 
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General  Sighting  Reduction  Program 


Input: 

Orbital  elements  at  epoch: 

T  time  of  node 

o 

P  nodal  period  in  days/ rev.  * 

c  rate  of  change  of  period 

d  rate  of  change  of  c 

£2  right  ascension  of  ascending 

node 

£2  .  rate  of  change  of  £2 

•  •  '  ..  • 

£2  rate  of  change  of  £2 

i  inclination  of  orbital  plane 

e  eccentricity 


Sighting  data: 

4>  Latitude  of  station 

X  Longitude  of  station  west 

H  height  of  station 

L  time  of  observation 

either  a  right  ascension 

6  declination 
Az  azimuth 
h  elevation 


N 

oo 

00 

00 


q 

q 

q 


epoch  revolution 

argument  of  perigee 

rate  of  change  of  co 

rate  of  change  of  oo 

perigee  distance 

rate  of  change  of  q 

rate  of  change  of  q 

epoch  of  decay 
equation 


or 
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2.  6.  1 _ Formulation  for  the  General  Sighting  Reduction  Program 


1)  At  =  t.-  Tq 

2)  RA'  =  RA  +  RA  At  +  -i-  RA  (At)2 
u>'  =  to  +  co  At  +■  — j  to  (At)2 

3)  Pa  =•  360°  P/(360°  -  to  P) 

4)  a  =  (P  /.  058672947) 2/3. 

a 

'  ■  ,  “  2 

5)  .  Pa  =  Pa  +  P  At  +  1/2  P  (Atr 

6)  a'  =  (Pa  /.  058672947) 2//3 


7)  ,  If  q  not  given: 

If  q  given: 


q  =  a  (1  -  e) ,  Go  to  8 
At'=  T'-ti 

q  =  q  +  q  At  +  l/2  q  (At)2 


8)  If  q  *  •  =  1  * ;  stop 

If  q  >  .  1  :  •  e  ^  =  (a  -  q)/  a 

9.)  ■  If  e'  <  0  :  0  -  e  ' 

•10)'  e'^-'xfUZl 

■  .  .  V  1+  e< 

1 1)  '  0 z  =  [  0q‘  +  .'98565  (Day  of  Year  of  Obs) 

+  360.  98565  (Fract.  of  day)  +  \  ],  0.<  0^  <  360 

12)  If  a  given  convert  a  from  hours  to  degrees 
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2.  6.  2 

13) 

14) 

15) 

16) 

17) 

18) 

19) 

20) 

21) 

22) 

23) 

24) 

25) 

26) 

27) 

28) 


The  following  Equations  are  for  Baker-Nunn  and 
Visual  portions  only.  Radar  is  listed  separately 


If  this  is  a  Baker  Nunn  observation:  Go  to  14 

If  not:  Go  to  20 


If  6 

<  -  23° 

If  6  >  - 

23° 

ao  bn 

=  .53123888°-  a 

aobn 

.  65918611°  -  q 

Zbn 

=  .53138889° 

^bn  = 

. 65941945° 

0bn 

=  .46215278° 

9bn  = 

. 57353333° 

P  = 

sin0^n(tan-6  +  tan 

0, 

bn 

~~1 

cos  aQbn  ) 

abn  "  aobn  =  tan""  (P  sin  aobn  /  (  1  -  p  cos  aobn)) 


a.  =  -  (abn  *  ^bn) 

Y  =  cos  ((abn  *  aobn  )/  ^  *  tan  (0bn/^)sec  ((  a^n  -  a0^n)  /  2) 

6  =  2  tan  ^  (\)'  +  6 

If  a  given:  Go  to  21 
If  not:  Go  to  25 

H /  =  0  +  a  ( MaM  as  in  input) 

-1  0 
h  =  sin  (sin  (j)  sin  6  +  coscj>  cos6  cos  H  ) 

If  h  <  0,  Return  for  next  obs. 

sin  (Aa  )  =  -  cos  6  sin  H  '/cos  h 

cos  (Az)  =  (sin6  -  sin<\>  sin  h)/  cos  <j>  cosh 
$'  =  tan-1  (.  99329985  tan<|>) 

RAS  =  0 
/  / 

+  j  =  * 

Rc  =  .  9966443/ [  1  00670015  cos2  4  j  ]  +  H/  6378. 174 

If  4>j  >  i  :  u  =  90°  (X  sign  of  tj>j  ),  Go  to  31 
If  <|>j  <  i  :  Go  to  29 
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29) 

/ 

u  = 

:  sin  ^  (sinc^/sin  i) 

30) 

If  cos  (RAg  -  RA')  <  0 ; 

u  =  180  -  uX 

If  cos  (RAs  -  RA  )  >  0  ; 

/ 

u  =  u 

31) 

V  = 

u  -  co y 

32) 

r  - 

a  (1  -e/^)/(  1  +  e^os  v) 

33) 

// 

H  = 

r  -  R 

o 

34) 

a  = 

90  -  sin  1  (cos  h/(  1  + 

h"))-  h 

35) 

+/+i 

=  sin  1  (cos  a  sin<j>  + 

sin  acos<j>  cos  Az) 

36) 

A  L 

=  sin  ^  (sin  a  sin  Az 

/cos  <j>/.+1  ) 

37) 

RA 

s 

=  (0  +  A  L),  0  <  RAg  <  360 

38) 

If  ( | 

^j+1  "  ‘t’j  |  “  10  4)  <  0  : 

Go  to  39 

If  £  o  >  j  +1-*  j:  Go  to  27  unless  observation 
does  not  converge  within  the  specified  number 
of  iterations.  In  this  case,  return  for  next 
observation. 


39) 

If  +  i  -  I  :  Return  for  next  observation 

If  not,  6-  j  i  “*■  4>c  :  Go  f°  40 

J  +  1  & 

40) 

Ls  =  (X  +  A  L),  0  <  Ls  <  360 

41) 

If  i  =  90°,  A  \  =  0  :  Go  to  43 

42) 

f  -I  . 

A  X  =(sin  (tan  4>s/tan  i) 

43) 

If  cos  u  <  0  :  AX  =  A  \  -IT 

If  cos  u  >  0  :  AX  =-AX; 

44) 

RAN  =  (RAg  +  AX  )  $  0  <  RAN  <  360 
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€ 

45)  E_  =  2  tan  ^  (e  /  tan  v/2) 

s 

46)  £'RA  =  tan  ^  (e^tan  (u>'/2)) 

47)  Ms  =  Es  -  e/sin  Eg 

48)  Mj^  =  Ej^  -  e'  sin  E*^ 

49)  Tn  =  t.-  ((Ms  -  -^RA )/360)  p',  0  <  (Ms  -  Mj^)  <  360 

50)  AN  =  (T  -  Tq)/P^  (the  integral  portion  thereof) 

51)  Tx  =  T0  +  PAN+  c(AN)2  +  d  (AN)3 

52)  If  |TX-Tn|  <  P/2:  Goto  53 

If  not,  then  when:  ( Tx  -  Tn)  >  0,  set  AN  =  AN-1,  Go  to  53 

(Tx  "  Tn)  =  °*  Go  to  53 

(Tx  -  Tn)  <0,  set  AN  =  AN  +1,  Go  to  53 

53)  RAX  =  RA  +  RA  (Tx  -  Tc)  +  -^  RA  (T%  -  TQ)2 

54)  A  Tn  =  Ta-  Tx 

A  RA  =  RAn  -  Rx 

Output  : 

N,  u°.  Tn,  ATn,  <(,s,  Lg°,  RAn°,  A  RAn°,  H.",  Km 
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Equations: 
1)  -  12) 

13)-19) 

20  ) 

21) 

22) 

23) 

24) 

25) 


26) 

27) 

28) 


Radar  Portion  of  General  Sighting  Reduction  Program 

Input: 

Same  as  for  other  portions  of  General  Sighting  Reduction 
Program  with  exception  that  p  (slant  range)  is  included 
as  part  of  sighting  data. 

Same  as  in  G.  S.  R.  P 
Sames  as  20  -  26  in  G.  S.  R.  P 

R0  =  [  .  996643/(1  -  .  00670015  cos2  <j>j)]  ^ 2  +  H/6378. 174 

R"  =  [  R.2  +  (p  / 6378. 174)2  +  2  R0  (p  ,/6378. 174)  sin  h ]^Z 

*  a  =  sin  ^  (p  cos  h/6378. 174  R  ) 

If  a  <  0  :  Return  for  next  observation 
If  a  >_  0  :  Goto  24 

<f)g  =  sin  1  (sin  cj>  cos  a  +  cos  4>  sin  a  cos  Az) 

AL  =  sin  1  ( sin  a  sin  Az/ cos  4>g  ) 

cos  AL  =  (cos  a  -  sin  <j>/  sin  <j/  /  cos  <$/  cos  4>g) 

If  cos  AL  <  0:  AL  =  180  -  AL:  Go  to  26 
If  cos  AL  >_  0:  Go  to  26 

RAS  =  (0  +  A  L),  0  <  RAg  <360 

If  cb  >  i:  Return  for  next  observation 
Ts  ■ 

If  not:  Go  to  28 

=  sin  1  (sin  <j>g  /sin  i) 
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29)  If  cos  (RAg  -  RA)  <  0:  u  =  180  -  u 
If  cos  (RAS  -  RA')  >  0:  u  =  u' 

30)  v  =  u  -  a/ 

31)  r  =  [  a/ (1  -  e^)/(l  +  e/ cos  v)]  6378.174 

32)  -  46)  same  as  40  -  54  in  G.  S.  R.  P 
Output: 

// 

Same  as  in  other  G.  S.  R„  P.  except  that  R  , 
height,  is  included. 
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2.  6»  4  Direction  Finder  Reduction  Program 

Input: 

Same  as  for  General  Sighting  Reduction  Program 
except  that  elevation  -  declination  is  not  given. 

Equations: 

1)  -  11)  Same  as  in  G.  S.  R.  P 

12)  \n  =  0  -  R 


13) 

AX  = 

xn  +  X 

14) 

(u  +  A 

u)  = 

:  tan  ^ 

(tan  AX/cos 

3  i) 

15) 

If  cos 

AX 

>_  0: 

Go  to  17 

If  cos 

AX 

<  0: 

Go  to  16 

16) 

If  (u  + 

> 

>  0: 

(u  +  Au)  = 

(u  +  Au)  - 

If  (u  + 

Am 

<  0: 

(u  +  -Am  = 

(u  +  Au)  + 

17) 

4>x  - 

sin 

•1  ,  . 
(sm 

(u  +  Au) 

sin  i) 

18) 

4>/  = 

tan 

1  (.  99329985  tan  4>) 

19) 

> 

N. 

II 

4>x 

-  4>/ 

20) 

If  Az<  0: 

Return  for  next  observation 

If  Az  > 

1  0: 

Go  to 

i  21 

21) 

If  Az  - 

■  180 

<  0: 

< 

ii 

< 

If  Az  - 

180 

IV 

o 

Azj  =  Az 

-  180 

22)  If  Az[  -  10“5  <  0:  Go  to  24 

If  Az(  -  10"5  >_  0:  Go  to  23 
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23)  If  |A<j>'|  -  10'5  <0:  Goto  24 

If  |  A<j/|  -  10“5  >  0:  Go  to  25 

24)  u  =  u  +  Au:  Go  to  35 

25)  sin  r\  =  sin  A  X  / sin  (  u  +  Au) 

26)  cos  r|  -  tan<j)^  /tan  (u  +  Au) 

27)  cot  Au  =  (cos  rj/tan  Acj/)  -  ((sin  rj/(sin  Aty'  tan  Az>) 

28)  Au  =  tan  *  (l/cot  Au) 

29)  If  Au  <  0:  Go  to  30 
If  Au  =0:  Go  to  34 
If  Au  >  0:  Go  to  32 

30)  If  Au  +  90  <  0:  Go  to  31 

If  Au  >_  0:  Go  to  34 

31)  Au  =  Au+  180:  Go  to  34 

32  )  If  90  -  Au  <  0:  Go  to  33 

If  90  -  Au  >_  0:  Go  to  34 

33)  Au  =  Au  -  180 

34)  u  =  (u -I-  Au)  -  Au 

35)  v  =  u  -  u/ 

36)  -  43)  Same  as  45  to  52  in  G.  S.  R.  P 

44)  A  T„  =  Tn  -  Tx 

45)  sin  <(/  =  sin  u  sin  i 

46)  R  =  [  .  9966443/(1  -  .  00670015  cos2  ^a]l^Z  +  H/6378. 174 


( 
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47) 

r  =  a/  (  1  -  e/2)/(l  +  e/cos  v) 

48) 

h"=  (r  -  R)  6378.  174 

49) 

Rq  =  [.  9966443/(1  -  .  00670015  cos2  <()')]1//2 

50)  -  52) 

Same  as  41  -  43  In  G.  S.  R.  P 

5  3) 

X  i  =  X  n  +  A  X 

54) 

AXq  =  -X  -Xt 

55) 

/  ,  /  /  / 
cos  Lq  =  sm<j)s  sm<j)  +  cos4is  cos4>  cosA  X 

56) 

tan  h  =  r  cos  L0  -  R0  /r  sin  L0 

57) 

If  h  <  0:  Return  for  next  observation 

If  h  >  0:  Go  to  57 

58) 

p  =  (R02  +  r2  -2  Rq  r  cos  L0)1//2  6378.  174 

Output: 

N,  Tj^,  Atn>  p,  H,  h. 
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2.  6.  5 _ Doppler  Reduction  Program 

Input: 

Same  as  General  Sighting  Reduction  Program  except 
that  elevation  -  declination  and  azimuth- right 
ascension  are  not  given. 

Equations: 


1)  - 11) 

Same  as  in  G.  S.  R. 

P. 

12) 

..  Xn  =' 

[  Ra'-  eG], 

0  <  X 

n  £  360 

13) 

Act  = 

P 

i 

£ 

II 

‘n  -  X 

14) 

If  A  a 

<  0:  Go  to 

15 

If  Aa 

>  0:  Go  to 

17 

If  Aa 

=  0:  Go  to 

19 

15) 

If  (Aa 

+  240)  <  0: 

Go  to 

16 

If  (Aa 

+  240)  >_  0: 

Go  to 

19 

16) 

Aa  = 

Aa  +  360: 

Go  to  19 

17) 

If  (Aa 

-180)  >  0:  , 

Go  to 

16 

If  (Aa 

* 

t— * 

00 

3 

(A 

.  o 

Go  to 

19 

18) 

A  a  ~ 

Aa  -  360 

19) 

Aaj  = 

vn-  X  + 

180 

20) 

If  Aax 

>  0:  Go  to 

21 

If  Aaj 

<  0:  Go  to 

22 

21) 

Aa^  = 

Aap  0  < 

Aa^  < 

360 

22) 

If  (Aa- 

L  -  180)  >  0 

:  Go  to  23 

If  (AaL  -  180)  <  0:  Go  to  24 
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23) 

Aa^  =  Acij  -  360 

24) 

If  4>  >  0:  Go  to  25 

If  <j>  <  0:  Go  to  27 

25) 

If  (Aa  +  180)  >  0:  Go  to  30 

If  (Aa  +  180)  <  0:  Go  to  26 

26) 

A  a  =  Aa^:  Go  to  31 

27) 

If  Aaj  >  0:  Go  to  28 

If  Aaj  <  0:  Go  to  29 

28) 

If  (Aai  -  90)  >  0:  Go  to  29 

If  (AaL  -  90)  <  0:  Go  to  31 

29) 

Aa  =  Aaj 

30) 

C13  =  1 

C^5  =  1,  Go  to  32 

31) 

CB  =  -1 

C15  =  -1 

32) 

COS.  C  =  COs|<j)|  cos  |Aa| 

33) 

34) 

/ 1  2  .1/2 
sin  c  =  (1  -  cos  c) 

0  .  “1  sin  <b 

0  =  sm  - : — 3  ■ 

r  sin  c 

35) 

If  >  0:  Go  to  36 

If  C15  <  0:  Go  to  37 

36) 

If  Aa  >  0:  Go  to  37 

If  A  a  <  0:  Go  to  38 

37) 

y  -  180  -  p  -  i,  Go  to  39 

38) 

•H 

1 

0CL 

II 
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39) 

d  = 

sin  1  [  (sin  c)  (sin  'y)] 

40) 

f 

u  = 

-i 

cos 

COS  c 

cos  d 

41) 

If  cos  c  <  0: 

Go  to  42 

1 

If  cos  c  >  0: 

Go  to  43 

42) 

u  = 

180  -  u' 

43) 

if  <t> 

>  0:  Go 

to  44 

if  <j) 

<  0  :  Go 

to  46 

44) 

If  (u 

'Ci3)  >  0: 

:  Go  to  45 

If  (u 

'c13)  <0: 

Go  to  46 

45) 

u  = 

u,  Go  to  5] 

46) 

u  - 

180  -  |  u 

|  :  Go  to 

51 

47) 

» 

u  = 

u  +  180 

48) 

If  (u 

•ci3)  1 

0:  Go  to 

49 

U{u'*C135<  0 

:  Go  to  50 

49) 

u  = 

// 

u,  Go  to  51 

50) 

u  = 

360  -  I  u 

i 

51) 

V  *  — 

/ 

U  -  0) 

! 

52)-59) 

Same  as  45  - 

52  in  G. 

.  S.  R.  P 

60) 

AT 

n 

=  Tn  -  ' 

rx 

61) 

4>'  = 

tan"1  (.  99329985  tan  ^) 

62) 

Ro  = 

:  .  9966443/^  -  .  00670015  cos2  +  H/6378. 174 

63) 

r  = 

a  (1  -  e  2)/(l  +  e'  cos  v) 

64) 

h  = 

tan"1  [  (r  cos  d  -  R)/r  sin  d] 
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65)  If  (h-90)  =  0  :  Go  to  66 
If  (h-90)  ^  0:  Go  to  67 

66)  p  =  r  -  R,  Go  to  68 

67)  p  :=  6378.  174*r*sin  d/cos  h 

68)  d  s  60  d 

Output: 

N'  Tn*  ATn>  d>  h>  P 
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2.  7 


Glossary 


Location 

Symbol 

Meaning 

A 

a 

Semi-major  axis 

AA1 

Column  1  overpunch  from  observation  card 

AA2 

Column  25  overpunch  from* observation  card 

AA3 

Column  31  overpunch  from  observation  card 

ALPHA 

* 

a 

Angle  used  in  intermediate  comp,  (see  Fig. 2.  i) 

APRIME 

/ 

a 

Predicted  semi-major  axis 

BNA 

QBN 

Baker-Nunn  section;  right  ascension  of  sat. 

BNAO 

aOBN 

Baker-Nunn  section;  equinox  constant 

BNGAM 

^BN 

Baker-Nunn  section;  angle  gamma 

BNTH 

eBN 

Baker-Nunn  section;  equinox  constant 

BNZ 

ZBN 

Baker-Nunn  section;  equinox  constant 

CJ3,  C15 

c13>  C15 

Doppler  section;  quadrant  conversion  constants 

C2PI 

2  TT 

Constant  =  6.  26318531 

C 

c 

Rate  of  change  of  period  (days  /rev. 

CLR 

p 

Slant  range  in  earth  radii 

COSET 

Cosine  of  r\  ,  (See  Fig.  2.  2) 

COSHD 

Cosine  of  elevation 

COSI 

Cosine  of  inclination  angle 

COSP,  COSPR 

Cosine  of  geocentric  latitude  of  the  station 

cosz 

Cosine  of  azimuth  angle 

COTU 

DF  section;  cotangent  of  A  ji 

D 

d 

First  derivative  of  rate  of  change  of  period 

DA 

Control  section;  day  of  observation 

DA 

Doppler  section;  predicted  longitude  difference 
between  station  and  nodal  crossing 

DAI 

Aa^ 

Doppler  section;  Acl+tt 

DAY 

Observation  time  in  days  of  year 

DB 

p 

Doppler  section;  intermediate  angle 
(See  Fig.  2.  1) 

DD 

d' 

Doppler  section;  arc  distance  from  station 
to  sub  satellite  point 

DEG 

Conversion  constant,  radians  to  degrees 

DELL 

A\ 

Longitude  difference  between  station  and  sub- 
satellite  point 
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DELN 

AN 

Difference  between  epoch  revolution  and 
the  revolution  of  the  observation 

DELRA 

ARA 

Computed  minus  predicted  satellite  right 
ascension 

DELT 

Atn 

Time  difference  between  observation  and 
epoch  times. 

DELTAT 

At 

Time  residual  (observed  minus  predicted 
time  of  nodal  crossing) 

DELTN 

Atn 

Time  difference  between  observation  and  the 
preceding  ascending  node 

DF 

Direction  finder 

DFL 

AX. 

DF  section;  right  ascension  difference 
between  station  and  ascending  node 

DG 

V 

Doppler  section;  angle  gamma 

DH 

AHt 

Height  tolerance  in  kilometers 

DI 

i 

Inclination  angle 

DLW 

XN 

Doppler  section;  predicted  longitude  of 
as.cending  node 

DRA 

A  RAt 

Right  ascension  tolerance  limit  in  degrees 

DT 

Att 

Time  tolerance  limit  in  days 

DTCMP 

tn 

Predicted  time  of  nodal  passage 

DU 

K 

Doppler  section;  computed  argument  of 
latitude  of  satellite 

E 

e 

Eccentricity 

ELEM 

Element  number 

ELEMR,ELEMW 

Arrays  used  to  store  element  sets 

ELS 

Ls 

Longitude  of  sub  satellite  point 

EMRA 

mn 

Mean  anomaly,  node  related 

EMS 

Ms 

Mean  anomaly,  satellite  related 

EN 

Nobs 

Revolution  number  at  observation  time 

EPRIME 

t 

e 

Predicted  eccentricity  at  time  of  observation 

ERA 

en 

Eccentric  anomaly  of  ascending  node 

1  -e 

Intermediate  quantity,  ■ 

ERAD 

ES 

Es 

Eccentric  anomaly  of  satellite 

FORDE 

Contents  of  col.  80  of  element  card 

FRACT 

Fractional  day  portion  of  observation  time 
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GI 

i 

Inclination  angle 

GIVEN 

N 

Epoch  revolution  number  ^ 

GL 

^s 

Station  longitude 

H 

H 

Station  height 

HDEC 

6  or  h 

Declination  or  elevation  angle  from 
observation 

HLS 

P 

Slant  range 

HM 

Minute  of  observation 

HO 

h 

Doppler  section:  elevation  angle 

HPPRI 

H" 

Height  of  satellite  above  earth*  s 

HPRIME 

HA 

Hour  angle 

HR 

Hour  of  observation 

HS 

DF  section:  object  height 

IELR 

Array  of  satellite  and  element  numbers 

IEYE1 

Obs  ID  (satellite  number  and  last  digit 
of  year  of  observation) 

IEYE2 

.  Obs  ID  (hour  and  minute  of  observation  time) 

IFLAG1 

Switch:  1  =  known  observation 

2  =  unknown  observation 

IFLAG2 

- 

Switch:  1  =  elements  found 

2  =  elements  not  found 

IIEYE1 

Obs  ID,  (month  and  day  of  observation  time) 

IIEYE2 

Obs  ID,  (seconds  of  obs  xlOO) 

IIPEYE1 

Same  as  IIEYE1 

IPEYEI 

Same  as  IEYE1 

IS 

Input  card  number  or  card  type 

I  TAG 

Tag  switch:  1  =  UO  tagged 

0  =  UO  not  tagged 

ITCH 

Switch  set  for  type  of  General  Reduction: 
negative  for  Baker-Nunn;  zero  for  visual, 
positive  for  radar 

ITERK 

Upper  limit  of  number  of  iterations  for 
convergence  in  computing  geocentric  latitude 
of  the  satellite 

ITL 

Tolerance  switch:  determined  by  observation 
lead  time 

ITY 

Equipment  type  used  by  observing  station 

IYR 

Year  of  observation  ^ 

Switch  set  to  1  for  unknown  obs.  ,  which  ™ 

JB 

indicates  that  residuals  are  to  be  tested 
against  tolerance  limits;  otherwise  set  to  0 
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JCLS 

Switch  1  =  classified  observation 

0  =  unclassified  observation 

JJ 

Number  of  stations  read  from  station  tape 

JT1 

Input  tape 

JT2 

Output  tape 

K 

Switch  indicating  uhich  section  of  program 
to  process  obs:  2  =  General 

3  =  Doppler 

4  =  Direction  Finder 

KAT 

Satellite  number 

KEL 

Number  of  element  sets  read 

KSTA 

Station  number 

KTAP 

Switch  normally  set  to  1.  Set  to  2  when  all 

UOs  written  on  interim  tape 

KUFO 

UO  switch:  -1  =  known  observation 

0  =  compute  vector  (General  Radar) 

1  =  vector  previously  computed 

2  =  initial  setting 

LEM 

Element  number 

LEND 

Card  type 

M 

Satellite  number  from  observation  card 

M-LAST 

Previous  satellite  number 

MO 

Month  of  observation 

MOUT 

Output  indicator  for  type  of  General 

Reduction  used 

MSG 

Observation  message  number 

MT 

Heading  switch:  2  =  no  heading  necessary 

for  General 

3  =  No  heading  necessary 
for  Doppler 

6  =  No  heading  necessary 
for  DF 

N 

N 

Epoch  revolution  number 

NAT 

Satellite  number 

NDCT 

Control  section:  Switch  set  negative  when 
necessary  to  obtain  new  obs  from  input  tape 

NOUT 

Set  to  $  when  time  of  obs.  precedes  epoch 
by  more  than  four  days 

NSTA 

Station  number  from  observation  card 

NUFO 

*  Previous  obs.  unknown  switch.  If  previous 
observation  was  unknown  this  switch  is  set 
to  non-zero 
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PA 

pa 

Anomalistic  period  in  days  per  revolution 

PAPRI 

Pa 

Predicted  anomalistic  period 

PEYEM 

Satellite  number 

PHI 

Geodetic  latitude  of  station 

PHIPJ,  PHIPJ1 

♦j 

Geocentric  latitude  of  satellite 

PHIPL 

4>'s 

Geocentric  latitude  of  station 

PHIPR 

4>' 

Geocentric  latitude  of  station 

PI 

7 T 

Constant  =  3.  14159265 

PI2 

tt/  2 

Constant  =  1*  57079633 

PM 

PNm 

Nodal  period  at  epoch  in  minutes  per  revolution 

PN 

PN 

Nodal  period  at  epoch  in  days  per  revolution 

Q 

q 

Perigee  distance  in  earth  radii 

QDOT 

q 

Rate  of  change  of  perigee  distance  (er/day) 

QDDOT 

q 

l/2  second  derivate  of  perigee  distance 

RA 

n 

Right  ascension  of  ascending  node  at  epoch 

RACOMP 

•  / 

Q 

Predicted  right  ascension  of  ascending  node 

RAD 

Conversion  constant,  radians  to  degrees 

RAN 

a 

Right  ascension  of  ascending  node  at 
observation  time 

RAS 

as 

Right  ascension  of  subsatellite  point 

RDOT 

U 

Rate  of  change  of  RA 

RDDOT 

l/2  second  derivative  of  RA 

RO 

Ro 

Radius  of  earth  at  subsatellite  point 

ROP 

r 

Radius  of  earth  at  station 

RPOLY 

•  f 
ft 

Predicted  RA  at  observation  time 

RPPRI 

Ah 

Difference  between  observed  and  predicted 
height 

RS 

R.g 

Distance  from  center  of  earth  to  given  sub¬ 
satellite  latitude 

RSMALL 

r 

Radial  distance  of  satellite  from  center  of 
earth 

SAT 

Satellite  number 

SEC 

Seconds  of  observation 

SHS 

h 

DF  section:  elevation  angle 

SINAL 

Sine  of  angle,  see  Fig.  2.1) 

1-2-38 


Wolf  Research  and  Development  Corporation 


REDUCT 


SINET 

DF  section:  sine  r\  (see  Fig.  2.2) 

SINI 

Sine  of  inclination  angle 

SINP,  SINPR 

Sine  of  geocentric  latitude  of  station 

SINZ 

Sine  of  azimuth  angle 

SLR 

P 

Slant  range 

SO 

P 

Doppler  section:  slant  range 

SSI 

Input  switch  to  inhibit  station  tape 

SS3 

Input  switch  to  eliminate  tolerance  limit  tests 
and  to  inhibit  the  interim  tape 

SS8 

Input  switch  to  run  all  observations  as 
unknowns 

SS9 

Input  switch  if  teletype  output  desired 

SS10 

Input  switch  to  eliminate  re- reduction  of 
untagged  observations;  inhibits  interim  tape 

SS11 

Input  switch  if  q-term  supplied 

STAIN 

Array  of  station  coordinates  read  from 
station  tape 

STEL 

Working  array  of  station  coordinates 

TANI 

Tangent  of  inclination  angle 

THETA 

0 

Sidereal  Time  at  station 

TLHS 

DF  section:  tangent  of  elevation  angle 

TMO 

Month  of  observation 

TNDF 

tn 

Predicted  time  of  node 

TOD 

[to] 

Integer  portion  of  epoch  time 

TOF 

*frac 

Fractional  part  of  epoch  time 

TOT 

t 

o 

Epoch  time 

U 

P 

Argument  of  latitude  of  satellite  in  orbital 
plane 

UDELU 

DF  section:  \i  +  A  p 

UO 

Unknown  observation 

V 

V 

True  Anomaly 

W 

fa) 

Argument  of  perigee 

WDOT 

fa) 

First  derivative  of  argument  of  perigee 

WDDOT 

fa) 

l/2  second  derivative  of  argument  of  perigee 

WPOLY 

f 

fa) 

Predicted  argument  of  perigee 

X 

$8 

Station  latitude 

XAT 

Tens  and  units  digits  of  satellite  number 
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XDAY 

XDEC 

Y 

YDAY 

YR 

YRA 

Z 

ZPRI 

ZRA 


tS 


\ 


s 


Az  or  a 


Smithsonian  day  at  epoch  time 

Five  least  significant  columns  of  elevation 
angle  or  declination  field 

Station  longitude 

Observation  time  in  Smithsonian  days 
Year  of  observation 

Six  least  significant  columns  of  azimuth 
angle  or  right  ascension  field 

Station  height 

DF  section:  predicted  azimuth  angle 
Azimuth  angle  or  right  ascension  of  satellite 
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Illustration  of  Angles  p,  a 
Figure  2.  1 


Illustration  of  Angle  r\ 
Figure  2.  2 
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REDUCT 


Writ*  M*g,- 
ILLEGAL  LEAD 

:ard  skippeo 


R*od  and 
Stor*  Station 
(Data  in  Array* 


KEY: 


/  Lott  Card  \ 
JOlS  R«ad  Volld\'— 
\  Lead  Card?/ 


station/ P^NEItmant 


Toltranct 

Switch 

S*t? 


TOLPK 


Set  Normal 
Toltranct* 


A3  J  Perform  Control  Functions  for  Observations 


ELNED  j  Read  and  Store  Elements  in  Arrays 


TOLPK  Retrieve  Tolerances  from  Table 
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No 


All  UOs 
Written  On 
Interim  Tope?/ 


Yei 


1 1 9002 

Dec  rement 
Cord  Count. 

All  Obs. 
Processed  ? 


/ End  of  All 
JLlS  Input  Data? 
N.  Col.  79*0 


5003 


No  /  Ob.  Type  =0? 
Cols.  4,5*0 


Yes 


-Hi. 


0 


*  15003 


KEY: 

© 

© 

© 

© 


Test  Validity  of  Lead  Card 
Process  an  Unknown  Observation,  If  Any, 
Read  an  Observation  From  Interim  Tape 
Continue  Processing  Observation 


REDUCT 


+  9507 
Write 
Teletype 
Ending 
Sentinel 

zr 


EX  IT 


From  Interim  Tape 
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Output  Msg.- 
UNTAGGED  UOt 
REDUCED  WO 
TOLERANCES 


Set  Large 
Toleroncee 


Clear  Switches 
Output  Msg.- 
END  OF  RUN 


Empty 

Output 

Buffers 


Read  Obs. 
From  Interim 
Tape 


No  /  Observation  \  Yes 
\  TVp**0?  /” 


Scratch  Tape 


Perform  Control  Functions  for  Obs. 


Continue  Processing  of  Unknown  Observation 
from  Interim  Tape 
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REDUCT 
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KEY: 


Perform  Control  Functions  for  Unknowns 


Return  to  Control  Portion  of  Program 


Determine  Observation  Type 
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KEY:_ 

f  B3  J  Perform  Control  Functions  for  Observations 


Obtain  Element  Set  for  Computations 


1  5035 
Output  M«g- 
UNOEFINED 
OBSERVATION  (2) 
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Sot.  No. 
Equal  To 
Prevloue  No.?. 


Set  Pick-up 
Of  Current 
Element 
Set 


Perform  Control  Functions 


f  B3J  Return  to  Control  Portion 
Vy'— ^  of  Program 

ELCAL3]  Retrieve  Element  Set 
v  J  from  Array- 


Convert  Time 


Check  Epoch  vs.  Obs.  Time 
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KEY: 


ml 
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REDUCT 


i 


KEY: 


Perform  Control  Functions  for  Observations 
Return  to  Control  Section  of  Program 
General  Sighting  Reduction 
Doppler  Sighting  Reduction 
Direction  Finder  Reduction 
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REDUCT 


Compute 
Sidereal  Time 
Of  Station 


v  /  Elevation,\  ^ 

Azimuth  ytL 
\  Given  ?  / 


Compute 
Sine, 
Cosine  Of 
Azimuth 


Compute 

Hour 

Angle 


3 


Compute 
Cosine  Of 
Elevation 


Compute 

Elevation 

Angle 


/  Sine  Of  \  w 
'Elevation  Anqle\  Vtt 
v  Greater  / 

\  Than  1  ?  / 


Compute 

Elevation 

Angle 


!» 


003 

Elevation^ 
Angle  Ngg.? 


Cosine  Of 
Azimuth 


©  © 

Output  Msg.: 

NEGATIVE 

ELEVATION 

Continue  Processing 

(”) 

Return  to  Control  Program 
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C 


471 


Moke  First 
(Approximation 
Longitude 
of  Node 


Ye« 


X 

A2!  J 


Radar  Ob* 


> 


4316 


Yes 


315 


UO  ? 


No 


Permit 

Permit 

Up  to  6 

Up  to  12 

Iteration! 

! 

Iterations 

AI6 


KEY: 


A 16)  Begin  Approximations  to  Geocentric  Latitude 
of  Satellite 


Computations  for  Radar  Observations 
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KEY: 

0  0 


Return  to  Control  Program 


Final  Computations  General  Section 
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REDUCT 
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KEY: 


Return  to  Control  Program 


See  if  Reasonable  to  Continue  Computations 
with  Current  Element  Set 
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KEY: 

© 


Set  Filial  Quadrant  Constants 
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REDUCT 


(Doppler) 

4 


KEY: 

© 


Return  to  Control  Section 
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REDUCT 


KEY: 


Return  to  Control  Section 


Output  for  Direction  Finder 
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(Direction 

Finder) 


Return  to  Control  Section 
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(Subroutine 

ELRED) 


B30 


Return  to  Card  Read 
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REDUCT 


(Subroutine 

EDCAL3) 


Return 
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3.  1  ROC,  Radar  Orbit  Computation 
3.  2  Function 

The  orbital  elements  of  a  satellite  are  computed  from  either  the 
radar  observations  of  the  elevation  angle,  azimuth  angle  and  slant  range,  or 
directly  from  the  geocentric  rectangular  coordinates  and  velocities. 

The  program  is  useful  in  obtaining  orbital  elements  for  newly  launched 
satellites,  in  generating  a  new  set  of  elements  for  satellites  that  have 
not  been  recently  sighted,  or  in  correcting  the  elements  of  a  satellite. 

A  predicted  orbit  can  be  based  on  as  few  as  three  consecutive 
observations  recorded  along  a  single  tracking  run  of  a  big  radar,  such 
as  Millstone.  An  odd  number  of  observations  must  be  supplied.  The 
move  observations  given  the  better  the  results.  The  midpoint  of 
the  radar  run  is  first  determined.  Then  the  other  points  are  picked 
up  in  pairs,  on  either  side  of  the  midpoint,  and  effectively  averaged. 

The  time  span  between  individual  pairs  should  be  greater  than  forty 
(40)  seconds.  The  geocentric  rectangular  coordinates  of  the  midpoint 
are  then  determined  and  the  elements  computed. 

If  the  geocentric  rectangular  coordinates  and  velocities  of  a 
point  are  used  as  input  to  the  program,  the  averaging  procedure  is 
skipped  and  the  orbital  elements  are  computed  directly. 


3.  3  Input 


A  request  card  precedes  either  input  option  (1)  or  (2).  The 
format  of  this  card  is  as  follows: 

Cols.  1»3  Option  (1)  -  Number  of  observation  cards  to  be 

read.  Must  be  an  odd  integer  between 
3  and  999. 

Option  (2)  -  field  ignored 

Cols.  6-17  Alphanumeric  satellite  name  or  identification  used 
in  output. 

Cols.  18-35  Alphanumeric  date  used  as  part  of  identification 
for  output. 

Col.  41  1  -  element  cards  requested  as  output 

Col.  42  1  -  Option  (1)  -  x,  y,  z,x,  y,  z 


printed  for  the  midpoint  of  the 
observations. 

-  Option  (2)  -  field  ignored 
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SotfUiU 

Path 


Representation  of  a  Radar  Run 


Fig.  3. 1 
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Cols.  72-80  Must  be  blank. 

Input  option  (1)  should  be  used  if  orbital  elements  are  to  be 
computed  from  radar  observations.  Option  (2)  should  be  selected 
if  the  orbital  elements  are  to  be  computed  from  the  geocentric  rec¬ 
tangular  coordinates  and  velocities  of  a  point  in  space.  The  input 
decks  should  be  as  follows: 

1.  Radar  observations  supplied. 

1.  Request  card 

2.  standard  station  card 

3.  An  odd  number  of  observation  cards  (3  to999) 
in  order  of  increasing  time. 

4.  A  card  with  a  nine  (9)  punch  in  column  79, used 
to  signal  the  end  of  the  data  deck. 

2.  x,  y,z,x,  y,  and  z  supplied. 

1.  Request  card 

2,  Rectangular  coordinates  in  the  following 


format: 

Cols. 

1-14 

x  in  kms. 

Cols. 

15-28 

y  in  kms. 

Cols. 

29-42 

z  in  kms. 

Cols, 

43-46 

Year  of  epoch 

Velocity  components 

in  the  following  format: 

Cols. 

1-14 

x  in  kms.  / sec. 

Cols. 

15-28 

y  in  kms.  / sec. 

Cols. 

29-42 

z  in  kms.  / sec. 

Cols. 

43-56 

Day  of  year  of  observation 

of  coordinates. 

4.  Card  with  a  nine  (9)  punch  in  column  79, used  to 
terminate  the  data  deck. 

The  quantities  x,  yf  z,x,  y,  z,  and  day  of  year  must  have  a  decimal 
point  punched  somewhere  in  the  field. 

3.  4  Output 

There  are  two  output  options  (A)  and  (B)  in  addition  to  the  normal 
output  describedunder  (C). 

A.  This  option  may  be  requested  only  under  input 

option  (1).  If  selected,  the  geocentric  rectangular 
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coordinates  and  velocity  components,  at  the  mean 
time  of  the  input  observations,  will  be  printed. 

The  x,  y,  and  z  coordinates  in  kilometers 
will  be  preceded  by  the  labels  XX=,  YY=,  ZZ=, 
and  the  velocity  components  in  kilometers  per 
second  will  be  preceded  by  the  notations  XDER=, 

YDER=,  and  ZDER.  The  time  of  the  observation 
in  the  day  of  year  notation  will  be  labled  TIME  =  . 

B.  This  output  option  if  selected  will  cause  a  punch 
out  of  the  standard  six  card  element  set.  The 
following  quantities  will  be  punched:  satellite 
number  (  as  read  in  from  the  observation  card  ), 
element  card  number,  satellite  name,  eccentricity, 
inclination,  year  of  epoch,  time  of  epoch  in  day  of 
year  notation,  nodal  period  at  epoch,  right  ascen¬ 
sion  of  ascending  node,  argument  of  perigee,  and 
perigee  distance.  All  other  fields  of  the  six  card 
element  set  are  left  blank  since  the  quantities  can 
not  be  computed. 

C.  The  normal  output  will  be  printed  in  the  format 
described  below. 

The  first  line  will  contain  the  heading  RADAR  ORBIT 
COMPUTATION  followed  by  the  station  name  as  read 
from  the  station  card.  The  second  line  has  the  label 
satellite  followed  by  the  alphanumeric  name  as  sup¬ 
plied  on  the  request  card.  This  is  followed  by  the 
satellite  number  which  was  read  from  the  observa¬ 
tion  cards.  The  date  supplied  on  the  request  card 
appears  on  the  third  line  of  output.  The  elements 
which  have  been  computed  are  then  listed  under 
appropriate  headings  as  follows:  the  same-major 
axis  in  km.  and  earth  radii,  the  right  ascension 
of  the  ascending  node  in  degrees,  the  radius  vector 
in  km.  ,  eccentricity  and  its  squared  term,  the  nodal 
period  in  days  and  minutes,  the  argument  of  perigee  in  - 
degrees,  the  velocity  in  km.  per  sec.  ,  the  perigee 
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distance  in  km.  and  in  earth  radii,  the  time  of  the 
last  perigee  pass  in  days,  the  inclination  in  degrees, 
the  apogee  distance  in  km.  and  in  earth  radii,  and 
the  time  of  the  last  nodal  crossing  in  days, 

3.  5  Processing 

If  input  option  (B)  is  used,  the  elements  are  computed  directly 
from  the  x,  y,  z,  x,  y,  and  z  supplied  as  input.  Otherwise,  these 
coordinates  are  computed  from  the  station  coordinates  and  the  radar 
observations.  An  odd  number  of  consecutive  observations,  at  least 
three,  must  be  supplied.  The  midpoint,  or  middle  observation,  of 
a  radar  run  is  chosen.  The  other  points  are  selected  in  pairs,  one 
from  each  side  of  the  midpoint.  The  time  span  between  the  individ¬ 
ual  observations  in  a  pair  should  be  greater  than  40  seconds. 

For  each  observation,  the  three  topocentric  coordinates  are 
converted  into  the  geocentric  rectangular  coordinates  x,  y,  and  z. 

Next,  the  velocity  components  x,  y,  and  z  are  found  for  each  pair 
of  observations  and  are  averfeged  together  for  the  final  velocity 
components  at  the  midpoint. 

The  orbital  elements  are  then  computed  from  the  postion  and 
velocity  components.  The  magnitude  of  the  radius  vector  and  the 
velocity  are  computed  directly  from  the  rectangular  coordinates  and 
velocity  components.  The  semi-major  axis,  nodal  period,  eccen¬ 
tricity,  perigee  and  apogee  distance  are  computed  next,  as  well  as, 
the  inclination  and  the  right  ascension  of  the  ascending  node.  The 
true,  eccentric,  and  mean  anomalies  are  found  and  the  time  of  peri¬ 
gee  and  nodal  crossing  are  computed.  Output  is  then  written  as 
specified  in  the  output  section. 


ROC 


Wolf  Jtaaareh  and  Dtvalopmant  Corporation 


3.  6 


B. 


Formulation 

If  input  option  2  used  go  to  D,  otherwise  compute  A,  B,  C. 

4>'  =  tan"1  (.99329985  tan<j>) 

„  .  9966443  L  H 

R  =  ■■ y  — -  ■  ■-  )*"  +  - 

\l  1  -  .00670015  cosy  6378.174 

Determine  rectangular  coordinates  for  each  observation  (i). 


r^  =  \l  R^  +  p  £  (  Pi  +  2  •  R  sin  h) 

Pi  =  {.|sin'A  cofl  hi/r^  |]  (0°.<  P  <  90°) 

A  =  li-Pi-x,  i 

/  -1  *  /  / 

<j>g  =  sin  (cos  cu  sin  <j>  +  sin  cu  cos  <j>  cos  Az^) 

AX  g  =  sin^sina*  sin  Az^ /cos  4>g  ) 


c 


X  =  X  -  AXe 
s  s 


0G  =  [0o+.  9856472  day.  +  360.  9856472  fract.  day.  -  X  8  ] ,  (0^eG  <  360°) 


X 

M- 

II 

r^  cos  <j>g  cos  0q 

Vi  = 

/ 

cos  <j>s  sin  0q 

ii 

a 

ri  sin  <|>g 

ii  = 

.2  2  2.3/2 

<xi  +  n  +  zi  > 

Compute  velocity  components  by  effectively  averaging  individual 

•  I  •  •  •  • 

x-,  y. ,  z: ,  components  of  each  pair  for  final  x,  y,  z  components. 

J  J  J 

Then  compute  velocity  and  £  .  Initially  indices  are  as  follows: 
l  =  1  signifying  first  observation,  n  is  total  number  of  observations, 
m  is  midpoint  observation. 


« 
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T12  = 

(.  07436574/60) 

T23  = 

(tn  "  tm) 

(.  07436574/60) 

t13  = 

(.  07436574/60) 

G1  = 

2  / 

t23  /t12 

t23  t13 

G2  = 

/  2  2./ 

't23  "  t12  '' Tl2  t28  T13 

G3  = 

2/ 

T12  //t12  1 

’23  T13 

H1  = 

T23/l2 

h2  = 

*T23  "  T12 

)/l2 

H3  = 

t12A2 

di  _  Gi  +  H]/ Li 

d->  =  G7  +  H,/r 

d. 


G3  +  H,/r 


3'-n 


x  =  -d.  x.  +  d«  xw  +  do  x„ 
1  I  2  m  .5  n 


y  =-d1yi  +  d2ym+  d3yn 


z  =  -  dj  zi  +  d2  zm  +  d3  zn 


Update  i  and  n.  i=i+lfn=n-l.  If  i  =  m,  go  on.  Otherwise 

•  «  • 

return  to  C  and  compute  x,  y,  z  for  another  pair  of  observations. 


m 

2 


•  Zj  '  / 

x  =  Xj/i,  for  i  pairs 

y  =  s  yj/i 


z  =  S  z  .  /* 


Compute  elements 
r  =  n/x2  +  y2  +  z2 


=  n/  X  2  +  y  2 
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jr  =  (xx  +  yy  +  zz)/r 
C5  =  ^2(631.  353746)2/rJ-  V2 
a  =  ((631.  35  3746)2/C5)/6378. 174 


P  =  .058672947  (a) 
n  ' 


3/2 


e  =  J 1 (V2  -V2)  £2/631.  3537462 a 

p  =  a  (1  -  e2) 

q  =  a  ( 1  -  e) 

O  =  a  (  1+  e) 

-1 


i  =  [  cos  (  (xy  -  yx )  / 631.  353746  \lp  )  ]  ,  {  -90°<^  i  <  +  90°) 


RA  =  tan’*  ( 


r  z  -  z  y 


x  z  -  zx 


sm  p. 


r  sin  i 


cos  fx  =  (x  +  (z  sin  RA  cot  i)/r_  cos  RA 
H-  =  f  quai  (cos  sin  f1) 
cos  v  =  (p/ r  -  1)/ e 


v  =  f  qual  (cos  v'  £  > 

a>  =  [p  -  v (0°<  u>  <  360°) 


,  *1  /  1  -  e  .  V 

tan  —  -  v  ^  -  g  tan 


-  e  sin  E^ 

Atx  =  Mj.  Pn/2n 
=  *obs  “  ^*1 
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3.  7  Glossary 


Location 

Symbol 

AMEAN 

Mi 

AMEANN 

m2 

ANGLE 

i 

APOGEE 

Oo 

APOGER 

O 

ARGPER 

GO 

AXIS 

a 

AZIM 

Az 

BETA 

P 

BUT 

T 

o 

COP 

COSRA 

COSU 

COSV 

CUT 

DAT 

di 

DAY 

DECLA 

<t>' 

Ts 

DELONG 

AX 

s 

DELTAN 

DELTA  T 

DET 

d2 

DOT 

d3 

E 

e 

ECCA 

Ei 

ECCAN 

E2 

ELAPSE 

ELEY 

h 

ESOUA 

2 

e 

FRACT 

GAT 

Gi 

GEO  CL 

<t>* 

Meaning 

Mean  anomaly 

Mean  anomaly 

Inclination  in  degrees 

Apogee  in  km  above  the  earth 

Apogee  distance  in  earth  radii 

Argument  of  perigee  in  degrees 

Semi-major  axis  in  km* 

Azimuth  from  observation  card 

See  Figure  3.  2  angle  (3 

Time  of  epoch  (day  of  year) 

Constant  631.  353746  squared 

Cosine  of  right  ascension  of 
ascending  node  at  epoch 

Cosine  of  argument  of  latitude 

Cosine  of  true  anomaly 

Time  of  epoch 

Coefficient  used  to  compute  x,  y,  z 

Day  of  observation 

Geocentric  latitude  of  satellite 

Difference  in  longitude  between 
station  and  subsatellite  point 

Difference  in  time  from  perigee  to 
node 

Time  of  obs  minus  time  of  perigee 
Coefficient  used  to  compute  x#  y,  z 
Coefficient  used  to  compute  x,  y,  z 
Eccentricity 
Eccentric  anomaly 
Eccentric  anomaly 
Day  of  year  of  observation 
Elevation  from  observation 
Eccentricity  squared 
Fractional  day  of  observation 
Coefficient  used  to  compute  x,y,  z 
Geocentric  latitude  of  station 
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GEOGL 

<t> 

Station  latitude 

GET 

G2 

Coefficient  used  to  compute  x,  y,  z 

GOT 

G 

3 

Coefficient  used  to  compute  x,  y,  z 

GRI 

Time  of  observation  minus  time  at 
node 

HA  LB 

n 

Number  of  pairs  of  observations 

HAT 

H1 

Coefficient  used  to  compute  x,  y,  z 

HEIGHT 

Station  height  in  meters. 

HET 

H2 

Coefficient  used  to  compute  x,  y,  z 

HOT 

H3 

Coefficient  used  to  compute  x,  y,  z 

HOUR 

Hour  of  observation 

HW 

Hour  after  hour  of  first  observation 

IDCI 

Input  tape 

IDCO 

Output  tape 

IFLAG 

End  of  input  indicator 

ISSW1 

Output  option-  1  for  punched  element 
cards 

ISSW2 

Output  option=  1  for  Cartesian 
coordinate  output 

ITYPE 

Input  card  type,  non-zero  for  end 
input 

IYR 

Year  of  observation 

KNAVE 

Time  of  epoch 

L 

Observation  card  number  being 
processed 

M 

Midpoint  observation  (number) 

MO 

Month  of  observation 

N 

Obs  paired  with  L  (number) 

Number  obs  cards  to  be  read 

NAT  NO 

Satellite  number 

NK 

Overpunched  column  1  frdm  obs. 
card 

NL 

Last  two  digits  of  satellite  number 
from  obs.  card 

PAK 

P 

Semi-latus  rectum 

PERIG 

q- 

Altitude  at  perigee  in  km. 

PERIOD 

p 

Nodal  period  at  obs.  time  in  days 

PERIOM 

pi 

Period  in  minutes 

PERIR 

q 

Perigee  distance  in  earth  radii 
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RADIUS 

R 

* 

RASC 

a 

RAT 

I3 

RAXIS 

ar 

RITAS  C 

RA 

RK 

ROOT 

r 

RT 

Earth  radius  at  station 
Angle  a  ,  see  Figure  3.  2 
Array  of  r ^ 

Semi- major  axis  in  earth  radii 

Right  ascension  of  ascending 
node  in  degrees 

Constant  6378.174  km./e.  r. 

Distance  from  center  of  earth  to 
satellite 

Constant  .  07436574/60=  Ke  /60 


RX 

SATNO 

SCAN 

SDAT 

SECOND 

SIDE 

SINRA 


0 

g 


SINU 

SLANT  P 

SLONG  X 

SMIN 

SMONTH 

SNAMEll 

SNAME2J 

STAME  " 

STEME 

STOME 

STUME 

TAME  t12 

TAZ 
TEZ  > 

TIZ  J 

TEME  t23 


Constant  -017453295  deg/rad. 
Satellite  number 
Time  of  ob.  in  seconds 
Smithsonian  date  of  ob. 

Seconds  of  observation 
Sidereal  time 

Sine  of  right  ascension  of  ascending 
node 

Sine  of  argument  of  latitude 
Slant  range  from  observation 
Longitude  of  sub  satellite  point 
Minute  of  observation 
Month  of  observation 

Alphanumeric  satellite  name 


Alphanumeric  station  name 


Elapsed  time  between  obs.  and 
middle  obs. 


Alphanumeric  date  of  observation 

Elapsed  time  between  middle  and 
last  obs. 

Tangent  of  E^/2 
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THEN 

Tangent  of  E2/2 

TIME 

Array  ot  obs.  times 

TINOD 

Time  of  node  in  days 

TINODS 

Time  of  node  in  Smithsonian  days 

TIPER 

Time  of  perigee  in  days 

TIPERS 

Smithsonian  time  of  perigee  in  days 

TOBS 

Day  of  year  of  middle  observation 

TOBSS 

Day  of  Smithsonian  year  of  middle  obs. 

TOME 

T13 

Elapsed  time  between  obs.  and  last 
obs. 

TRUE 

V 

True  anomaly 

U 

u 

Arg.  of  lat.  of  sat.  in  orbit  plane 

VECDOT 

r 

First  derivative  of  r  in  km/sec. 

VECTOR 

r 

Vector  magnitude  in  km. 

VELOX 

V 

Velocity  in  km/sec. 

VK 

Computed  7.  90529382/4io.  of  pairs 
of  obs. 

W 

Day  after  day  of  first  observation 

WLONG 

Xo 

Station  longitude 

X 

Array  of  computed  x-coordinates 

XDER 

Sx/v  k 

Yields  final  x  velocity  component 

XDOT 

X 

x  velocity  component 

XDUMP 

Ex 

Summation  of  individual  x  components 

XX 

X 

x  coordinate  of  r  on  km. 

Y 

Array  of  computed  y-coordinates 

Y CONST 

9°. 

Sidereal  time  at  start  of  year  of  obs. 

YDER 

Ey^  *  vk 

Yields  final  y  velocity  component 

YDOT 

y 

y  velocity  component 

YDUMP 

Ey 

Summation  of  individual  y  components 

YEAR 

Last  digit  of  year  of  observation 

YR 

Year  of  observation 

YY 

y 

y  coordinate  of  r  in  km. 

Z 

Array  of  computed  z-coordinates 

ZDER 

E  z • • vk 

Yields  final  z  velocity  component 

ZDOT 

z 

z  velocity  component 

Z  DUMP 

Ez 

Summation  of  individual  z  -components 

zz 

z 

z  coordinate  of  r  in  km. 
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KEY: 


Interim  Tape  to  Output  Tape 
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Compute  Elements 
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KEY: 

© 


Return  to  Process  Next  Case 


Compute  Smithsonian  Day 


( *0AV  i 


Convert  Smithsonian  Day  to  Gregorian  Date 
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QUAC(X,  Y) 


QUAL(X,  Y) 


QUAT(  Y,  Z) 


SMITH(X)  - 


places  an  angle  in  the  proper  quadrant  (0  to  2ir)  after 
taking  the  absolute  value  of  the  arc  sine  of  the  angle, 

(  |  sin"*Y  |  ).  The  following  arguments  must  be  given: 
X  =  cosine  of  the  angle 

Y  =  sine  of  the  angle 

places  an  angle  in  the  proper  quadrant  (0  to  2ir)  after 
taking  the  arc  cosine  of  the  angle,  (cos  *X).  The 
following  arguments  must  be  given: 

X  =  cosine  of  the  angle 

Y  =  sine  of  the  angle 

places  an  angle  (the  eccentric  anomaly)  in  the  proper 
quadrant  (0  to  2tt)  after  taking  the  arc  tangent  of  the 
angle  times  two,  (2  tan  *Z).  The  following  arguments 
must  be  given: 

Y  =  sine  of  the  true  anomaly  (v) 

Z  =  tangent  of  the  eccentric  anomaly  over  two,  (tan-y) 

retrieves  0^  for  the  year  of  computation,  given  the 
argument  X  which  is  the  last  digit  of  the  year. 
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4.  1 
4.  2 


4.  3 


LOCVEC,  Vector  Coordinates  for  Lockheed 
Function 

The  program  computes  the  predicted  position  and  velocity 
for  Lockheed  from  nodal  element  sets.  The  output  is  written  on 
magnetic  tape  for  printing  and  for  punching  five- channel  paper 
tape  for  teletype  transmission.  The  teletype  data  is  received  at 
Sunnyvale  Tracking  Center  where  it  becomes  binary  input  for  a 
CDC  1604  computer. 

Input 

The  input  data  is  ordered  as  follows: 

(1)  Up  to  five  hundred  request  cards 

(2)  A  card  with  a  numeric  punch  (1-9)  in  col.  8. 

This  indicates  the  end  of  the  request  deck. 

(3)  Standard  six  or  seven  card  element  sets  of 
the  satellites  in  the  request  deck  or  all 
satellites  (up  to  500  sets). 

(4)  A  blank  card  which  signals  the  termination 
of  the  element  deck. 


The  elements  sets  do  not  have  to  be  in  the  same  order  as  the 
satellites  appearing  in  the  request  deck. 

The  following  information  should  be  included  on  the  request 


card: 


Cols.  1-3 
Col.  8 
Cols.  9-12 


Cols.  13-20 
Cols.  21-24 


The  SPADATS  satellite  number 
Must  be  blank 

The  STC  (Sunnyvale  Tracking  Center) 
satellite  number,  or  if  the  SPADATS 
satellite  number  is  used,  it  should  be 
preceded  by  a  nine  (9)  punch  in  col.  9. 
The  alphanumeric  name  of  the  satellite. 
The  alphanumeric  abbreviation  of  the 
country  of  orgin. 
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There  is  one  output  line  for  each  satellite.  The  order 
is  the  same  as  that  of  the  request  deck.  Each  line  contains: 
(a)  the  satellite  number;  (b)  the  Sunnyvale  Tracking  Center 
number  or,  if  preceded  by  a  nine  (9),  the  SPADATS  number; 
(c)  the  element  number;  (d)  the  month,  day,  hour  of  epoch; 
(e)  seconds  since  the  start  of  the  epoch  month;  (f)  epoch 
revolution  number;  (g)  the  x,  y,  z  coordinates  in  feet,  and 
the  velocity  components  in  feet  per  second. 

Teletype 


The  basic  message  consists  of  a  header  and  thirty-one 
words  of  five-level  teletype  punch.  A  visual  header  and  a  list- 
able  teletype  header  are  included  at  the  start  of  each  message. 
The  visual  portion  identifies  the  tape  as  a  SPADATS  vector  with 
the  characters  MSP"  and  the  four  digit  vehicle  number;.  The  list- 
able  header  contains  the  word  "SPADATS"  followed  by  the  vehicle 
number,  the  month,  day  and  the  nearest  GMT  hour  of  the  last  up¬ 
date  of  vectors.  Tape  contents  and  format  are  presented  on  the 
following  pages. 


Processing 


The  request  cards  are  read  into  an  array.  This  array  is 
checked  as  each  element  set  is  read  into  core,  and  the  element 
sets,  for  which  vectors  are  required,  are  stored. 

The  nodal  elements  to  be  used  are  converted  to  N,  M,  sets 
as  required  by  the  Analytical  Integration  Routine  (XYZSB).  The 
required  position  and  velocity  components  are  obtained  from 
this  routine. 

LOCVEC  converts  the  position  coordinates  to  feet  and  the 
velocity  components  to  feet  per  second.  These  quantities  are 
then  written  on  the  output  tape  for  off-line  printing  through  the 
UBC.  The  conversion  to  the  required  teletype  format,  described 
in  the  output  section,  is  then  achieved  and  written  on  the  tape 
for  off-line  punching  on  five-channel  paper  tape.  This  teletype 
data  becomes  input  for  a  CDC  1604  computer  at  the  Sunnyvale 
Tracking  Center. 
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Word  No. 

1 

2  &  3 

4 

5 


6 


7 

8 

9 

10 

11 

12 

13 

14 


TAPE  CONTENTS  AND  FORMAT 
Content  &  Format 

Check  sum  2^4  (see  note  1). 

Identification  number,  8  BCD  characters  (see  note  2). 

Revolution  number  for  vector,  19  bits,  D23 — D  fixed 
integer,  scaled  2^.  J 

Bits  D4—  Dq  are  all  zeros. 

Bits  D23-D17  are  all  zeros. 

Bits  D|6  must  be  set  equal  to  "1". 

Bits  D15 —  D|4  must  be  zeros. 

Bits  D|g—  Dq  are  vehicle  numbers  (0001  to  9999)  fixed 
integer. 

Th  is  number  will  be  supplied  by  the  STA  for  each 
vehicle,  (i.e.  1204  or  2203,  etc.) 

^23*^16'  ®  kits  all  zeros. 

D|s —  D| 3,  3  bits  fixed  integer,  number  of  vectors 
being  transmitted  for  this  particular  vehicle. (This 
will  probably  always  be  1.  See  further  note  3) 

D|2~D0  are  all  zeros. 

D23—  DO, 24  bits  all  zeros. 

Source,  4  BCD  characters. 

D23~D^  24  bits  all  zeros. 

M  <1  it  II  11  11 

It  l|  (I  II  II  H 

II  It  II  II  II  II 

II  II  II  II  II  II 

II  II  II  II  II  It 
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15 


16  &  17 
18  &  19 
20  &  21 
22  &  23 

24  &  25 
26  &  27 
28  &  29 
30  &3I 
Note  I  . 


Note  2. 


D23  D20'  4  bits  al  I  zeros  . 

D|9 —  Dh,  20  bits  fixed  integer,  number  of  data 
points  (or  number  of  observations)  used  in  fit. 

t  (machine  time)  see  note  4. 


X 

Y 
Z 

* 

X 

« 

Y 

z 


r  position  vectors;  48  bits,  floating  point. 


>  velocity  vectors;  48  bits,  floating  point. 


o  (standard  deviation  of  data) 

Word  1  is  a  check  sum  of  all  bits  on  the  tape.  It  does  not 
include  the  parity  bits.  The  check  sum  is  formed  by  tabu¬ 
lating  all  24  bit  words  on  the  tape  and  adding  all  bits. 

The  overflow  beyond  the  24th  bit  is  folded  under  and  added 
to  the  previous  sum  to  get  the  final  check  sum. 

Words  2  and  3  give  the  identification  number.  Any  8  legal 
BCD  characters  are  permissible.  It  is  suggested  that  these 
words  be  used  to  indicate  the  Spacetrack  object  designation 


(i.e.  1961  Al  for  1961  Alpha  l,or  I960  B  2  for  I960  Beta  2). 
Note  3.  The  need  for  more  than  one  vector  at  any  time  for  one 
vehicle  is  not  apparent  in  this  case.  Therefore,  these  3 
bits  should  always  indicate  1, 
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Note  4, 


Note  5. 


Machine  time  is  the  number  of  seconds  elapsed  since  00  Hrsv 
GMT,  on  the  first  of  the  month. 

In  Figure!  the  D's  indicate  data  bits  and  the  P‘s  indicate 
parity  bits.  Note  that  there  is  both  horizontal  and  vertical 
odd  parity.  Note  the  repeating  pattern  of  data  word  start 
bits.  There  must  be  a  tape  start  header  and  a  tape  stop 
pattern.  If  there  are  10  different  vehicles  on  one  physi¬ 
cal  length  of  tape  there  must  be  10  tape  start  headers  and 
10  tape  stop  patterns,  one  for  each  vehicle.  The  tape  must 


be  transmitted  three  times  in  succession. 


FORMAT  OF  DATA  TAPE 
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Precede  listable  msg. by  a  carriage  return,  2  line  feeds,  and  1  letter. 
Follow  listable  msg.by  a  carriage  return,  2  line  feeds,  and  1  letter. 
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Formulation 

A.  Convert  nodal  elements  to  N,  M  elements 

1.  a  =  q/  (1  -  e) 

2.  p  =  q  (1  +  e) 

3.  no  =  .  07436574/a3/2 

4.  axn  =  e  coso) 

5.  ayn  =  e  sin  co 

6.  Ej^.  =  -2  tan  _1  (  ']f( l-e)/(l  +  e).tan  co/2) 

7.  M[  —  Ej^  “  ©  sin  Ejyj 

8.  L  =  (*>  +  M  +  £2 

2  2 

9.  Cn  =  (  -360nQ  c  7T  )  where-CM  =  drag,  coeff;  c  is  rate  of 

change  of  period. 


10. 


keLso 


000120717 


3  -  5e 


cos  1 


n  3  2,  .  2.  tA  27  2/ 

(1-—  e  )  -sin  i (4  - e  ) 


B.  Use  Analytical  Integration  Routine  (XYZSB)  to  compute  predicted 
position,  r,  and  velocity,  r  ,  and  intermediate  quantities. 
Equations  for  this  routine  may  be  found  in  Aeronutronic  . 
Publication  U-1691  page  4-78. 


C.  Upon  exit 


1. 


2. 


x  =  20925725.  863  x  Convert  earth  radii  to  feet 
y  =  20925725. 863  y 
z  =  20925725.  863  z 

x  =  25935.  85859142  x  Convert  earth  radii/kemin  to  feet/second 
y  =  25935, 85859142  y 
z  =  25935. 85859142  z 
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* 

3*  ^day  of  month  =  [  ^mo 

thour  =  (^o  "  [  *o])  24  +  .  5 
^secs  =  (^day  of  month  +  ^o  “t 

Output:  Satellite  No.  ,  Sunnyvale  sat. 

*day  of  month*  Hiour*  ^secs* 


* 

[  to]  =  Integer  value  of  tQ 


])  86400 

no.  ,  element  no.  , 
N  *  x,  y,  z,  x,  y,  z 
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4.  7  Glossary 

Location 

ADDCON 

AO 

AXNO 

AYNO 

BODY 

C 

CIR 

CON 

COSI 

CTERM 

DATA 

DTR 

E 

EE 

ELAPS 

EO 

EOSQ,  ESQ 

EXPON 

FLNU 

FORDE 

FPS 

FT 

HEADER 

ID 

IEL 

IHOUR 

ILE 

IR 

ISAT 

ISTC 

IT 
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Symbol  Meaning 


a 

a 

xn 

a 

yn 

C" 


cos  i 


e 


Parity  indicator 
Semi-major  axis  at  tQ 

axn  I  components  in  orbit  plane 
ayn  J  at  to  of  a 

Intermediate  buffer  used  when  output 
quantities  converted  to  Baudot 

Drag  coefficient 

Constant  =  360  (2tt  in  degrees) 

Constant  =  .  05862947 

Cosine  of  inclination 

Array  of  rate  of  change  of  period 

31  word  output  buffer  for  data  in  Baudot  code 

Constant  =  .  017453292519  (degrees  to  radians) 

Eccentricity 

Array  of  eccentricities 

Seconds  in  month  of  epoch  revolution  number 

Eccentricity  at  tQ 

Eccentricity  squared 

Exponent  of  floating  point  number 

Floating  point  number 

Alphanumeric  E,  column  80  in  7  card  element  sets 

Constant  =  25935.  85859142  (earth  radii/  kemin 

to  feet/sec) 

Time  of  epoch  in  fractional  days 

Table  containing  heading  for  paper  tape  output 

Element  card  number 

Element  number 

Hour  of  epoch 

Array  of  element  numbers  from  request  cards 

Epoch  revolution  number 

Satellite  number 

Sunnyvale  satellite  number 

Time  of  epoch  in  integer  days 
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J 

Index  equals  number  of  element  sets  matched 
with  request  card  satellite  number 

JTI 

Input  tape 

JTO 

Output  tape 

LAPD 

Day  of  month  of  epoch 

MANTIS 

Mantissa  of  floating  point  number  on  conversion 
to  Baudot 

MO 

Array  of  total  numbers  of  days  since  first  of 
year  .by  month 

MON,  MONTH 

Month  of  epoch 

N 

Index  equals  number  of  request  cards  with  elements 
available 

NAT 

Satellite  number 

NATNO 

Array  of  satellite  numbers  from  request  cards 

N3PI02 

Constant  -  3tt/2 

NSTC 

Year  of  launch  from  request  cards 

NSTCNO 

Array  of  years  of  launch,  from  request  carjds 

NUMBODO 

Table  of  Baudot  code  for  digits 

P 

P72 

,pn>7/2 

Nodal  period  at  epoch  -  F 

Pn7/2 

PA 

Array  of  nodal  periods  at  epoch  in  days 

PDT 

C 

C-rate  of  change  of  period  in  days/rev 

PDOT 

Binary  Baudot  rate  of  change  of  period 

PI 

TT 

Constant  =  tt 

PI2 

2  7T 

Constant  =  2tt 

PIOV2 

tt/2 

Constant  =  tt/2 

PTSIX 

% 

Perigee  distance 

QQ 

Array  of  perigee  distanced 

RAN 

Array  of  right  ascensions 

REV 

N 

Epoch  revolution  number 

REVE 

Array  of  epoch  revolution  numbers 

REVNO 

Binary  Baudot  epoch  revolution  number 

RIN 

Constant  =  20925725.  863  (earth  radii  to  feet) 

SAVEi 

Temporary  to  save  contents  of  XR1  and  XR2 

SAVI 

Temporary  to  save  contents  of  XR3  and  XR4 
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SECPOC 

Time  of  epoch  in  binary  Baudot  code  seconds 
in  month 

SET 

Switch  set  to  indicate  which  half  paper  tape 
output  buffer  used 

SINI 

sin  i 

Sine  of  inclination 

SIND 

sin  fx 

Sine  of  argument  of  latitude 

SOURCE 

Country  of  origin  of  satellite  from  request  card 

SOURCEA 

Array  of  countries  of  orgin 

SMAN 

Sign  of  floating  point  number 

SNAME 

Name  of  satellite  from  request  card 

SNAMEA 

Array  of  names  of  satellite 

SYMBNUM 

Table  of  digits  which  yield  visual  symbols 
when  punched  on  paper  tape 

T 

Time  interval  in  minutes  since  time  of  epoch 

TA 

i 

Inclination 

TAE 

Array  of  inclinations 

TAPEOUT 

128  word  holding  buffer  for  paper  tape  output 

TEMP 

Table  of  TTY  functions 

TENM6 

Constant  =  10  ^ 

TIM 

Array  of  epoch  times 

TIME 

t 

o 

Time  of  epoch  in  day  of  year 

TWOPI 

Constant  =  2tt 

W 

00 

Argument  of  perigee  in  radians 

WDOT 

CO 

First  derivative  of  argument  of  perigee 

WN 

Array  of  arguments  of  perigee 

WZ 

cos  i 

Cosine  of  inclination 

X 

X 

x- coordinate  of  r 

XI 

Binary  Baudot  x- coordinate  of  r 

X2 

Binary  Baudot  x -velocity  component 

X23SAV 

Temporary  to  save  contents  of  XR2  and  XR3 

X4SAV 

Temporary  to  save  contents  of  XR4 

XDOT 

X 

x-velocity  component  of  r 

XJGRCF 

Constant  =  L  20717  x  10  ^ 

XKE 

Constant  -  ke  =  .  0743674 

XLO 

m 

Mean  longitude  at  tQ  in  radians 

XM302 

Constant  =  3/2 
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XM4C03 

Constant  =  4C/  3 

XMZ 

sin  i 

Sine  of  inclination 

XNO 

Mean  angular  motion  at  tQ 

XNODEO 

Right  ascension  in  radians 

Y 

y 

y-coordinate  of  r 

Yi 

Binary  Baudot  y- coordinate  of  r 

Y2 

Binary  Baudot  y-velocity  component 

YDOT 

y 

y-velocity  component  of  r 

Z 

z 

z- coordinate  of  r 

Z1 

Binary  Baudot  z-coordinate  of  r 

Z2 

Binary  Baudot  z -velocity  component  of  r 

ZDOT 

z 

z -velocity  component  of  r 

Other  terms  may  be  found  in  description  of  the  subroutine  XYZSB. 
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Continues  with  Teletype  Conversions 
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KEY 


Returns  to  Compute  Next  Satellite 
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5. 1 


5.  2 


5,  3 


5-  4 


CCOE,  Cartesian.  Coordinates  From  Orbital  Elements 
F  unction 

From  a  given  element  set,  this  program  calculates  the 
Cartesian  coordinates  x,  y,  z  and  the  components  of  velocity 
-  ^ of  a  satellite  for  a  specified  length  of  time  at 

given  intervals.  The  output  can  be  expressed  either  in  kilometers 
and  kilometers  per  second,  or  in  earth  radii  and  earth  radii  per 
minute. 


Input 

The  data  deck  is  comprised  of:  1)  a  standard  6  or  7  card 
element  set,  2)  as  many  request  cards  as  needed  and,  3)  a 
blank  card.  This  sequence  is  repeated  for  all  satellites  requir¬ 
ing  this  computation.  The  final  sequence  should  be  followed  by  a 
second  blank  card  to  terminate  the  program. 

The  following  information  should  be  punched  on  the  request 

card: 


cols.  1-10 
cols.  11  -  20 
cols.  21  -  30 
col.  31 


Time  start  (in  days) 

Time  step  (in  days) 

Time  stop  (in  days) 

Blank  -  output  in  kms. 

1  -  output  in  earth  radii 

Decimal  points  may  be  punched  anywhere  in  each  of  the  first 
three  fields. 


Output 

The  output  consists  of  Cartesian  coordinates  and  their 
related  components  of  velocity  for  the  time  increments  requested. 
The  dimensions  given  are  in  kilometers  and  kilometers  per 
second,  or  earth  radii  and  earth  radii  per  minute,  depending  on 
the  output  option  chosen.  The  sentinels  required  by  the  TELTYP 
program  are  included  so  that  conversion  to  teletype  tape  is  possible. 
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5.  5  Processing 

After  reading  a  standard  six  or  seven  card  element  set  and  a 
request  card,  the  variables  x,  y,  z:,  x,  y,  and  z  are  calculated  and 
printed  according  to  the  specified  output  option.  The  time  is  in¬ 
cremented  by  the  time  step  specified  on  the  request  card.  Unless 
the  stop  time  has  been  exceeded,  the  program  computes  new  vari¬ 
ables  for  the  incremented  time. 

When  the  stop  time  specified  on  a  request  card  has  been  ex¬ 
ceeded,  the  program  assumes  that  the  next  card  is  a  request  card 
for  the  same  satellite  for  another  time  interval.  If  the  card  is 
blank,  the  program  returns  to  the  element  read  section  for  another 
standard  element  set.  A  return  to  the  executive  routine  is  made, 
if  a  second  blank  is  encountered.  Otherwise  the  requests  for  the 
new  satellite  are  processed  as  above. 

5.  1  Error  Messages 

1.  NEGATIVE  NODAL  PERIOD,  SATNO _ f _ Reading 

continues  until  next  case  is  found 

2.  ELEMENT  CARDS  OUT  OF  ORDER.  Same  procedure  as 
under  (1) 

3.  MISSING  NODAL  PERIOD.  Continues  processing  that  case. 

is  used  for  P^. 

a.  n 

4.  SUBROUTINE  ERROR  EXIT  FROM  OCTAL _ 

Subroutine  or  irrecoverable  input  output  error.  Exits  to 
system  if  GO  option  taken.  The  message  will  be  repeated 
if  the  STOP  option  is  used.  A  dump  should  be  given  if  the 
computer  is  in  a  non-interruptable  mode  of  operation. 

5.  6  Formulation 


360  P 

o 


1. 

Pa  = 

o 

360  -  PQ  Z 

r  Pa  I 

2. 

ao  = 

[.058672947  I 

3. 

t  = 

TI-  4o 

4. 

XX  = 

t 

p0 

5. 

N  = 

Integer  part  of  xx 
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6. 

7. 

8. 
9. 

10. 

11. 

12. 

13. 

14. 

15. 

16. 

17. 

18. 

19. 

20. 

21. 

22. 

23. 

24. 

25. 

26. 


If(Pa(N)  -  (t-tw(N)))  <  0  If  (Pa(N)-(t-tJN)))  >  .0 
N  =  N  +  1  Go  to  17 

Go  to  9 

M(t)  =  ^TnT  ■  (‘-WW 

E'(t)  =  M(t) 

E  (t)  =  M(t)  +  e  (N)  •  sin  (E'(t)) 

Is  |  E(t)  -  E^t)  |  >_  10"7 

Calculates  sines  and  cosines  of  i2,oo,i 
ax  =  a(N)  (cos  go  •  cos  £2  -  sin  u>  •  sin  £2  •  cos  i) 
ay  =  a(N)  (cos  go  •  sin  £2  +  sin  to  •  cos  £2  •  cos  i) 
az  =  a(N)  •  sin  go  •  sin  i 

bx  =  -  a(N)  N)  (sin  co  •  cos£2  +  cos  go  •  sin  £2  •  cos  i) 

b  =  a(N)  lf\  -  e^(N)  (  -sin  w  •  sin  12  +  cos  w  •  cos  12  .  cos  i) 
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.[  2, 

27. 

bz  =  a(N)  yi  -  e  (N)  cos  <*>•  sin  l 

t  i 

28. 

Cl  =  cos  (E(t))  -  e(  N) 

29. 

c3  =  sin  (E(t))  -  e(N) 

30. 

=  T§T5D  •  sin<E(,» 

1  -  e  (N)  ‘  COS  (E(t)) 


31.  c'4  =  '  cos  (E(t)) 

1  -  e(N)  •  cos  (E(t)) 


32. 


33. 


34. 


35. 


36. 


37. 


38. 


39. 


x  =  6378. 174  (C^i  c,b  ) 

it  x 

y  =  6378.  174  (C^y  +  r  b  ) 

2  y 

z  =  6378. 174  (Ctaz  +  C  b  ) 
x  =  .  07382146  (C3ax  +  C4bx) 

y  =  .  07382146  (C3ay  +  C4by) 

z  =  .  07382146  (C3az  +  C4bz) 

t  =  t  +  At 

t  >  Tf  ? 

No:  Go  to  6 


Yes:  Return  for  next  case 


5.  7 

Glossary 

Location 

Symbol 

Meaning 

A 

Semi-major  axis  (on  7  card  element  sets  only) 

AMT 

M(t) 

Mean  anomaly  at' time  t 

AN 

a(N) 

Semi-major  axis  at  revolution  N 

AO 

ao 

Semi-major  axis  at  epoch 

CZ  PI 

Z  •  PI 

CGT 

cos  w 

Cosine  of  argument  of  perigee 

CHT 

cos  (12  (t)) 

Cosine  of  right  ascension  at  time  t 

Cl 

cos  i 

Cosine  of  inclination 

CO 

c 

Rate  of  change  of  period  -  _ 

Nodal  c  term  i  ^ 

CSPTRK 

DELT 

*1 

Time  from  epoch 

DN 

Number  of  complete  revolutions  from  epoch 
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DO 

c 

First  derivative  of  rate  of  change  of  period 

EAA 

■  E(t) 

Approximation  to  eccentric  anomaly 

EAG 

En 

Eccentric  anomaly  of  ascending  node 

EAT 

E(t) 

Eccentric  anomaly  at  time  t 

EN 

e(N) 

Eccentricity  at  revolution  N 

EO 

eo 

Eccentricity 

ET 

*0 

Epoch  time 

GDOT 

<*> 

First  derivative  of  argument  of  perigee 

GO 

“o 

Argument  of  perigee 

GT 

«(t) 

Argument  of  perigee  at  time  t 

HDOT 

n 

First  derivative  of  right  ascension 

HGDDOT 

U) 

Second  derivative  of  Argumentof  perigee 

HHDDOT 

si 

Second  derivative  of  right  ascension 

HO 

SIq 

Right  ascension  of  ascending  node 

HT 

Sl(  t) 

Right  ascension  at  time  t 

IDN 

N 

Number  of  complete  revolutions  from  epoch 

IELNO 

Element  number 

IFORD 

Column  80  on  fifth  element  card 

ISATNO 

Satellite  number 

1,  Output  in  earth  radii  and  earth  radii/ min. 

KM 

0,  Output  in  kilometers  and  kilometers/sec. 

MAGIN 

Input  tape  number,  0 

MAGOUT 

Output  tape  number,  11 

NAME  1 

First  six  characters  of  satellite  name 

NAME  2 

Second  six  characters  of  satellite  name 

PAE 

Pa 

Anomalistic  period  of  epoch 

PAN  ' 

Pa(N) 

Anomalistic  period  for  revolution  N 

PI 

tt,  (3.  1415926536) 

PNN 

P„(N) 

Nodal  period  for  revolution  N 

PNODL 

Pn 

Nodal  period  of  epoch  (if  7  card  element  set) 

PO 

P 

n 

Nodal  period  of  epoch 

RHO 

57.29578 

ROOT 

Temporary  storage 

SGT 

sin  co 

Sine  of  argument  of  perigee 

SHT 

cos  (SI  (t)) 

Sine  of  right  ascension  at  time  t 
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SI 

Sin  i 

Sine  of  inclination 

T 

Ti 

Initial  time  in  days 

TA 

i 

Inclination 

TANN 

UN) 

Time  of  perigee  passage  of  revolution  N 

TNN 

*n<N> 

Time  of  nodal  crossing  for  revolution  N 

TSTOP 

Final  time  in  days 

X 

X 

x  component  of  position  vector  of  satellite 

XX 

Revolutions  from  epoch 

XDOT 

dx 

“37 

x  component  of  velocity 

Y 

Y 

y  component  of  'position  vector  of  satellite 

YDOT 

If 

y  component  of  velocity 

Z 

z 

z  component  of  position  vector  of  satellite 

ZDOT 

d  z 

*3T 

z  component  of  velocity 
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KEY: 


0  Initialize  to  Read  in  Next  Element  Set 


Continues  With  Program 


CCOE 


Wolf  Roitorch  and  Dtvtlopmonf  Corpora tio 


Continues  With  Program 
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6.  1  RESPLT,  Residual  Plot 

6.  2  Function 


RESPLT  reduces  observations  against  the  N,  M  element  sets 
and  produces  punched  card  output  which  can  be  used  on  the  EAI 
Data  Plotter.  The  residuals  which  can  be  plotted  are:  (1)  the 
difference  in  time  between  the  predicted  and  observed  positions 
versus  the  revolution  and,  (2)  the  vector  magnitude  difference 
versus  the  revolution. 


The  plots  are  especially  useful  as  an  aid  in  the  analysis  of 
element  sets.  Large  residuals  may  indicate  that  the  current  ele¬ 
ment  sets  need  updating  or  that  a  piece  has  broken  off  the  satellite. 

Maneuvers, not  otherwise  easily  detected,  may  be  revealed  when 
these  residuals  are  presented  graphic  form  (cf.  Fig.  6.  2). 

New  Piece  Maneuver 


A  t 


A  t 


6.  3 


Revolution  Number 
Figure  6.  1 


Input 


Revolution  Number 
Figure  6.  2 


The  program  requires  observation  data  to  be  entered  as  card 
input.  Element  data  and  sensor  data  may  be  entered  as  card  input 
or  read  from  the  SEAI  tape. 


The  observations  must  be  obtained  from  standard  observation 
cards  which  have  previously  been  sorted  by  satellite  number.  These 
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cards  must  have  an  association  status  punched  in  column  80 
(cf.  Fig.  6.  6).  If  untagged  observations  (satellite  number  = 
zero)  are  to  be  reduced  against  a  particular  element  set,  a 
standard  observation  card  containing  the  number  of  the  desired 
element  set  and  a  blank  sensor  number  should  be  placed  in  the 
observation  deck  preceding  the  untagged  observations.  The  num¬ 
ber  of  observation  cards  allowed  is  limited  only  by  the  space 
allocated  to  OBLOC. 


There  are  six  input  options  which  may  be  specified  on  the 
SPSJOB  card.  Each  option  specifies  the  source  of  the  sensor  and 
element  data,  i.  e.,  input  cards  or  SEAI  tape. 


Option 

Observation 

Element 

Sensor 

0 

Ob. 

Cards 

SEAI  Tape 

SEAI  Tape 

1 

Ob. 

Cards 

Element  Cards 

SEAI  Tape 

2 

Ob. 

Cards 

Element  Number  Cards 

SEAI  Tape 

3 

Ob. 

Cards 

SEAI  Tape 

Sensor  Cards 

4 

Ob. 

Cards 

Element  Cards 

Sensor  Cards 

5 

Ob. 

Cards 

Element  Number  Cards 

Sensor  Cards 

Fig.  6.  3 


Element  data  may  be  obtained  from  standard  7  card  element 
sets  with  an  E  in  column  80.  Since  the  executive  routine  reads 
the  element  sets  into  EBLOC,  the  number  of  element  sets  is 
limited  by  the  size  of  that  block.  Element  data  may  be  obtained 
from  the  SEAI  tape  if  element  sets  are  not  included  in  the  input 
de  ck. 

Sensor  data  may  be  obtained  from  standard  sensor  cards 
with  an  S  in  column  80.  The  number  is  restricted  only  by  the  size 
of  SBLOC.  Sensor  data  may  be  obtained  from  the  SEAI  tape  if 
no  sensor  cards  are  included  in  the  input  deck. 
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6. 4  Output 

Printed  output  consists  of  the  reduced  observations  sorted 
by  revolution  number  within  a  satellite  number  in  groups  of  100. 

A  heading  line,  which  describes  the  output  quantities  in  the  columns 
below,  is  printed  for  each  satellite.  The  satellite  number,  obser¬ 
vation  number,  revolution  number,  time  in  minutes  since  epoch, 
vector  magnitude  in  kilometers,  number  of  revolutions  since  epoch, 
element  number,  association  indicator,  and  station  number  are 
printed  for  every  revolution  number. 

The  punched  card  output  can  be  used  to  plot  residuals  on  the 
EAI  Data  Plotter  using  K  +  E  10x10  cm.  graph  paper.  The  pen 
command  for  the  Data  Plotter  is  contained  in  column  55.  The  data 
deck  is  divided  up  as  follows: 

1)  A,  card  with  a  command  to  stop  the  plotter  (7  in  col.  55). 
The  operator  can  set  the  origin  at  this  time. 

2)  A  set  of  cards  which  will  enable  the  plotter  to  draw  the  x 
and  y  axes  (6  cards). 

3)  A  card  which  will  stop  the  plotter  so  that  the  above  can  be 
tried  again  if  necessary. 

4)  A  set  of  cards  which  will  plot  the  visual  characters  S,  E, 
R,  T  and  the  information  required  to  identify  the  plots. 

S  will  be  followed  by  the  satellite  number,  E  will  be  fol¬ 
lowed  by  the  element  number,  R  will  be  followed  by  the 
epoch  revolution  number,  and  T  will  be  followed  by  the 
the  time  of  epoch  in  days. 

5)  A  card  which  will  stop  the  plotter  (7  in  col.  55). 

6)  The  data  cards  containing  the  residual  information  to  be 
plotted.  There  is  one  card  for  each  line  of  printed  output. 
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IBM  523  Summary  Punch 

9  4  9  1  7  8  9  10  It  12  19  14  19  1C  17  II  19  20 


At(y)  vs.  ARev(x) 
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IBM  523  Summary  Punch 


I  2  3  4  5  6  7  6  »  10  II  I*  13  14  IS  16  17  It  I*  10 


VMag  (y)  vs  A  Rev  (x) 
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6.  4.  1  EAI  Data  Plotter  Operating  Instructions 

An  IBM  523  Summary  Punch  is  used  to  read  the  punched  cards 
for  input  to  the  plotter.  Board  wiring  diagrams  are  included  for 
each  of  the  two  possible  graphs  (cf.  Fig.  6.  4  and  Fig.  6.  5). 

The  residuals  which  may  be  plotted  are  data  time  versus 
data  revolution  and  vector  magnitude  versus  data  revolution. 
Coordinates  and. pen  commands  for  both  graphs  appear  on  the  same 
data  cards. 

Note  that  it  is  possible  to  plot  both  graphs  on  the  same  piece 
of  graph  paper  by  reading  the  data  cards  through  the  523  Summary 
Punch  twice.  This  is  accomplished  by  reading  all  of  the  punched 
cards  for  the  first  graph.  The  axes  and  visible  information  as  well 
as  the  points  on  the  graph  will  be  plotted.  If  part  six  (6)  of  the  data 
deck  is  reread,  the  second  set  of  the  residuals  may  be  plotted  on 
the  same  graph  paper. 

The  plotter  pen  color  and  523  board  must  be  changed  before 
rereading  the  data  cards.  Two  separate  graphs  may  be  produced 
by  reading  all  punched  cards  twice  and  changing  the  graph  paper 
and  523  board. 

For  the  proper  plotting  of  all  data,  the  origin  on  the  graph 
paper  should  be  five  (5)  centimeters  right  and  nine  (9)  centimeters 
up  from  the  bottom  left  corner  of  the  graph  paper. 

Graph  scaling  is  as  follows.  The  revolution  number  from 
epoch  is  the  x-axis  for  both  graphs.  The  epoch  revolution  number 
lies  at  x  =  0.  Each  centimeter  represents  20  revolutions,  so  that 
the  possible  values  for  plotting  lie  in  the  range  of  -100  and  +  400 
revolutions.  Vector  magnitude  in  kilometers  is  the  y-axis  for 
one  graph.  Each  centimeter  represents  500  kilometers  and  the 
possible  range  of  values  is  0  to  4500  kilometers.  Delta  time  in 
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minutes  is  the  y-axis  for  the  other  graph.  Each  centimeter 
represents  five  (5)  minutes  and  the  possible  range  of  values  is 
-45  to  +45  minutes. 

6.  5  Processing 

The  program  reduces  observations  against  element  sets  to 
obtain  time  and  vector  magnitude  residuals  which  may  be  plotted 
against  the  revolution  number.  Up  to  100  observations  maybe 
processed,  one  at  a  time.  The  association  status  is  checked  to 
determine  whether  the  observation  is  an  angles  observation  only 
or  a  radar  observation. 


Association 

Status 

Observation 

Kind’ 

Association 

Category 

Will  RESPLT 
Accept? 

1 

Radar 

Associated 

Yes 

2 

Radar 

Doubtful 

Yes 

3 

Radar 

Unassociated 

Yes 

4 

Angles  Only 

Associated 

Yes 

5 

Angles  Only 

Doubtful 

Yes 

6 

Angles  Only 

Unassociated 

Yes 

7 

Range  Rate 

Associated 

No 

8 

Range  Rate 

Unassociated 

No 

9 

Radar 

Special  Unassoc, 

Yes 

O  or  A 

No 

Fig.  6.  6 


The  proper  year  constants  are  obtained  and  time  of  epoch  is 
converted  to  days  since  1950.  The  observation  counter  ;s  increased 
by  one  and  the  association  indicator,  observation  number,  and 
sensor  number  from  the  observation  are  stored  for  output.  The 
sidereal  time  at  the  time  of  epoch  is  computed.  The  seini-latus 
rectum  and  the  components  of  the  unit  vector  perpendicular  to  the 
orbit  plane  are  found  to  compute  the  inclination,  the  right  ascension 
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of  the  ascending  node,  the  eccentricity,  and  the  semi -major 
axis  at  epoch. 

The  mean  argument  of  latitude,  the  mean  angular  motion,  a 
drag  coefficient,  and  the, perifocal  distance  are  computed.  The 
time  since  epoch,  the  sidereal  time  at  the  station,  and  the  x,  y 
components  of  the  station  vector  are  found.  The  subroutine 
XYZSB  is  used  to  compute  the  predicted  position  and  velocity  plus 
intermediate  quantities. 


Observation  type  (OTYPE)  will  be  referred  to  in  subsequent 
paragraphs  as  illustrated  in  Fig.  6.  7 


OTYPE 

Observation 

Kind 

Quantities  FromObs.  Card 

1 

Angles  Only 

Azimuth  -Elevation 

2 

Radar 

Azimuth -Elevation,  Range 

3 

Radar 

Azimuth -Elevation,  Range,  Range  Rate 

4 

Radar 

Azimuth -Elevation,  Range  Rate 

5 

_ _ 

Angles  Only 

Right  Ascension-Declination 

Fig.  6. 7 


If  the  observation  is  an  angles  only  observation,  the  range  is 
computed.  If  OTYPE  =  1,  the  predicted  azimuth  and  elevation  are 
found.  If  OTYPE  =  5,  the  predicted  right  ascension  and  declination 
are  found. 

If  the  observation  is  a  radar  observation,  the  predicted  range 
is  computed.  The  predicted  azimuth  and  elevation  are  computed. 

If  OTYPE  =  3  or  4,  the  predicted  range  rate  is  computed. 

For  all  observations,  the  residuals  are  computed  to  find  the 
vector  magnitude.  Unless  100  observations  have  been  processed, 
the  program  returns  for  the  next  observation. 
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When  all  of  the  observations  have  been  processed  for  a 
single  satellite  the  program  generates  data  for  punched  card  out¬ 
put  for  the  plotter.  The  punched  cards  contain  all  necessary 
plotter  control  functions.  Punched  cards  are  generated  to  plot  the 
axes,  visual  satellite,  element,  epoch  revolution,  and  epoch  day 
numbers.  These  cards  are  followed  by  the  data  cards.  The  pro¬ 
gram  then  returns  to  process  the  next  group  of  observations. 
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6.  6 


F  ormulation 


1.  0_.  =  0  +  t  (rotation  of  earth)  deg/ solar  day 

G  o  days 

2.  Compute  semi-latus  rectum. 

Z  2  2 

p=h  +  h  +  h 
o  xo  yo  zo 

3.  Compute  x,  y,  z  components  of  (unit  vector  -L  orbit  plane). 

W  *=  h  /\/p“ 

XO  ’*  xo'  o 

W  =  h  /\[p~ 
yo  yo  o 

W  =  h  A/p~ 
zo  zo  o 


4.  Compute  inclination. 

i  =  tt/2  if  W  =0,  otherwise; 

'  rw  r\ 

;) 


zo 


i  =  tan'1  \\fl  -  W_2/Wn 


ZO  ZO  i 

5.  Compute  right  ascension  of  ascending  node  at  epoch. 
-1 


Q  =  tan 
o 


(W  / sin  i)  /  ( -W  /sini) 
xo  '  yo/ 


6.  Compute  eccentricity  and  semi-major  axis  at  epoch 


2  2 
axNo  +  ayNo 


a  =  p  /l  -  e 
o  o'  o 

7.  Compute  mean  argument  of  latitude  and  mean  angular  motion 
at  epoch. 

U  =  L  -  £1  if  W  positive,  otherwise  u  =  L  +  ft 
ooozo  ooo 

v  /  3/2 

n  =  k  /a  ' 

o  e1  o 

8.  Compute  a  drag  coefficient,  perifocal  distance,  and  K  L 

2  7  e  so 

C"  =-Co<no  )36% 

q0  =  ao(1  '  eo) 


K  L, 
e  so 


K  Ja 
e  e 


7/2 


^  ,  2  27  2.  .  2.  n  3  2.  , 

3  -  5e  -  (4  -  —  e  )  sm  l  -  (1  -  —  e  )/cosi 
o  4  o  '  2  o 


9.  Compute  time  since  epoch  and  sidereal  time  at  station. 

T  =  (t  -  t  )  1440  +  time  of  day  in  minutes  since  midnight. 


0  =  +  X  +  .  0043752691  T 

s  G 
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10.  Compute  observed  position  from  the  observation. 

X  =  cos  G  X/cos  0 

—  s  — 7  s 

Y  =  sin  0  X/cos  0 

—  s  —  s 

Use  subroutine  XYZSB  to  compute  predicted  position,  r,  and 
velocity,  r  ,  plus  intermediate  quantities. 

If  angles  only  observations,  go  to  17. 

Equations  11-16  for  radar  observations. 


11. 


12. 


13. 


14. 


15. 


Compute  x,  y,  z  components  obs.  unit  vector  from  observer  to 

obj.  with  respect  to  horizon. 

L  ,  =  -  cos  Az  cos  h 
xh 


L  ,  =  sin  Az  cos  h 
yh 

L  .  =  sinh 
zh 

Compute  x,  y,  z  components  S  (unit  vector  from  observer  to 
south) . 

S  =  sin  <f>  cos  0 
X  s 


S  =  sin  sin  0 
Y  s 

S  =  -cos  6 
z 

Compute  x,  y,  z  components  Z  (unit  vector  from  observer  to 
zenith) . 

Z  =  cos  <b  cos  0 
X  s 


Z  =  cos  d>  sin  0 

y  s 

Z  =  sin  <b 
z 

Compute  x,  y,  z  components  E  (unit  vector  from  obs.  to  east). 


E 

X 

=  -sin  0 

E 

=  cos  0 

y 

s 

E 

=  0 

Compute  (obs.  unit  vector  from  obs.  to  object). 

L=L  S+L  E+L  Z 
—  xh—  yh—  zh  — 
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16.  Compute  ob.  £,  vector  directed  to  object,  and  (3. 
x_  -  p  L  -  R 

Api  2  z 

r  =  yx  +  y  +  z 

(3  =  |sin"l^(R  •  W)j| 

Go  to  30* 

Equations  17-29  for  angles  only  observations. 

17.  Compute  x,  y,  z  components  of  range  vector  p. 


p  =  r  +  R 


If  Az-El  type  observation,  go  to  18. 

If  RA-Dec  type  observation,  go  to  20. 

18.  Compute  predicted  elevation. 

p  cos  0  sin  cb  +  p  sin  0  sin  <b  -  p  cos  <1> 
x _ s _  2 _ s _ z _ _ 

Lxh  =  p 


-  p  sin  0  +  p  cos  0 

rx _ s  y _ s 

P 


Lr 


zh 


p  cos  0  cos  <f>  +  p  sin  0  cos  <f>  +  p  sin  <J> 
x  s  z  s  z 


p 


19.  Compute  predicted  azimuth. 


Go  to  22. 

20.  Compute  predicted  right  ascension. 

h  ~  p/p 


21.  Compute  predicted  declination. 
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Go  to  27. 

22.  Compute  x,  y,  z  components  obs.  unit  vector  from  observer  to 

object  with  respect  to  horizon. 

L  _  =  cos 6  cos  a 
xli 

L  1  =  cos5  sina 

yh  -  - 

h  .  =  sin  5 
zh 

23-26.  Same  as  equations  12-15.  Go  to  28. 

27.  Compute  x,  y,  z  components  Lq. 

L  =  cos  6  cos  a 

X 

L  =  cos  6  sina 

y 

L  =  s  in  5 
z 

28.  Compute  observation  range. 

p=  (X*  W  +  Y  •  W  +Z-W  )/(L  •  W  +L-W  +L  -W  ) 
xo  yo  zo  1  x  xo  y  yo  z  zo 

29.  Compute  predicted  range. 


30.  Compute  Au,  change  in  mean  argument  of  latitude. 


31 .  Compute  A  t. 

At  =  (Au  R2)/(Ke  -s/p") 

If  angles  only  observation,  go  to  36. 

32.  Same  as  equation  17. 

33-34.  Same  as  equations  18-19. 

35.  If  Az-El,  Range  Rate  Obs.  (OTYPE  =  4),  compute  predicted 
range  rate. 

X  =  -Y0 

Y=xe 
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Z  =  0 


Pc  =  L  •  (p  +  R) 

36.  Compute  range  residual. 

A  r  =  p  -  p 
r  rc 

37.  If  Az-El  type  observation,  (OTYPE  /  5). 


40. 

41. 


Ah  =  h  -  h 


Aa  =  I Az  -  Az 


c  I  cl 

If  RA-Dec  type  observation,  (OTYPE  =  5). 

Ah  =  6  - 


A  a  = 


a  -  a 


c  !  c  | 

38.  If  A  h  >  tt  ,  Ah=2Tr-Ah 

IfAa>Tr,  Aa  =  2  it  -  Aa 
If  angles  only  observation,  go  to  40. 

39.  Compute  vector  magnitude. 


Vmag  “  +  (p  A  h)  ^  +  (p  Aa  cosh)^ 

Go  to  41.  _ _ 

V 

mag  V  "  c  '  ”  c 

Compute  revolution  and  delta  revolution  number. 


A  h)  ^  +  (p^  A  a  cosh)^ 


N  =  N  +  — 
O  ZlT 


AN  =  ~ 
Zir 


Process  next  observation. 


6.  7  File  Definitions 


Symbol 

Meaning 

File 

Core  Image 

ALPHA 

Azimuth  in  radians  or  right  ascension 

o 

48  bit  fit.  pt.  number 

ASTAT 

R  =  association  indicator  =  1-9  (BCD) 

o 

OOOOOOOR 

AXNO 

axN 

E 

48  bit  floating  point 

AYNO 

ayN 

E 

48  bit  floating  point 

BLEXP 

Expiration  of  bulletin,  in  days  since 
1950.0 

E 

48  bit  floating  point 

CAPZ 

Z,  in  earth  radii 

S 

Floating  point 

CFI 

If  other  than  A  or  0,  indicates  that 
RODOT  contains  max.  freq.  shift  in 
eye/ sec. ^ 

O 

OOOOOOOCF 

1-6-15 


Wolf  Research  and  Development  Corporation 


RESPLT 


CO 

CTYPE 

DAYNO 

DELTA 

ELNO 

EFOCH 

EQTYP 

HXO 

HYO 

HZO 

ISTOP 

MSGNO 

OALT 

OBRITE 

OBSNO 

OTYPE 


PHANG 

PHIRD 

RANGE 

REVF 

REVI 

RODOT 

SATN 

SATNM 

SATNMZ 

SATNO 

SAT  OB 


c,  in  days/rev. 

Coordinate  type  for  LA 

Day  number  (relative  to  1950.  0) 

Elevation  in  radians,  or  declination 

Element  set  no.  (binary) 

T  days  since  1950 
o 

CL  =  class.  T  -  type  of  equipment 
h 

xo 

h 

yo 

h 

zo 

Inclination  correction  indicator 
5  character  message  number 
H,  in  earth  radii 

Brightness  in  apparent  magnitudes 

Observation  number 

Observation  type 

0  =  range  rate  only 
1  =  azimuth  and  elevation 
Z  =  azimuth,  elevation,  range 
3  =  azimuth,  elevation,  range, 
range  rate—'' 

5  =  right  ascension  and  declination 
0^  phase  angle  coeff.  in  degrees 
<J>  in  radians 

Slant  range  in  earth  radii 
Final  revolution  number 
Epoch  rev.  no.  or  initial  rev.  no. 
Range  rate  in  earth  radii/kemin 
Satellite  number  (BCD) 

Satellite  name 
Satellite  name 
Satellite  number 
Number  of  observations 


E  48  bit  floating  point 

s  ooooooo@ 

O  48  bit  fit.  pt.  number 

O  48  bit  fit.  pt.  number 

E  Binary  integer 

E  48  bit  floating  point 

O  CLAAAAATT 

E  48  bit  floating  point 

E  48  bit  floating  point 

E  48  bit  floating  point 

E  OOOOOOOI 

O  AAAMMMMM 

S  Floating  point 

O  Same  as  tape  record 

O  AAAXXXXX 

O  OOOOOOOOT 


E  Floating  point 

S  Floating  point 

O  48  bit  fit.  pt.  number 

E  Floating  point 

E  Floating  point 

O  *  48  bit  fit.  pt.  number 

E  AAAAABBB 
E  NNNNNNNN 

E  NNAAAAAA 

O  AAAAASSS 

E  48  bit  floating  point 
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SATRM 

Rms  in  kilometers 

E 

48  bit  floating  point 

STAID 

Station  number 

O 

AAAAANNN 

Station  number 

s 

AAAAABBB 

STBRT 

Standard  brightness 

E 

Floating  point 

STGAR 

F -sign  bit  on-classified 

S 

F  @  A  H  p 

STNM 

Sensor  code 

S 

NNNNNNNN 

STNM2 

Sensor  name  (BCD) 

s 

NNNNNNNN 

STYPE 

Sensor  type 

s 

OOOOOAAA 

TOY 

Year  of  T  -  1  BCD  character 

0 

E 

O  O  O  O  O  O  O  Toy 

UTIME 

Time  of  day  (min.  since  midnight) 

o 

48  bit  fit.  pt.  number 

XLAMBA 

\  radians  east 

s 

Floating  point 

XLO 

L  radians 
o 

E 

48  bit  floating  point 

XOVCT 

X/ cos  0  earth  radii 

S 

Floating  point 
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KEY: 


in  OB  LOG 


^B7^)  Prepare  Obs.  for  Output , 

©foBSLOD  j  Initialize  to  Retrieve  1st  Ob. 
Test  for  Sensor 
Availability 

©Test  Availability  of 
Processed  Obs. 

©Retrieve  Next  Ob. 
from  OBLOC 


©Initialize  to  Retrieve  1st  Elem. 
Set  in  EBLOC 
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KEY: 


Compute  x,  y,  z  Coordinates 
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Begin  Ob.  Sort  by  Rev.  No 


Wolf  Reieofch  ond  Devtlopcwnt  Corporation 


KEY: 

© 


Retrieve  Ob.  Data  from  Array  Storage 


RESPLT 
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KEY: 


Return  to  Process  Next  Observation 


© 


Empty  Output 


Buffers  and  Exit  to  Exec. 


«> 
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7.  1  PREPINT,  Satellite  Situation  Report  From  Nodal  Elements 

7.  2  F unction 

The  purpose  of  PREPINT  is  to  supply  the  sub- satellite  point 
and  related  data  of  all  satellites  at  specified  times.  The  longitude 
and  time  at  the  last  ascending  node  are  also  computed  for  each 
satellite. 

A  maximum  of  500  satellites  may  be  included  in  each  report. 
However,  positions  will  be  computed  only  for  those  satellites  in¬ 
cluded  in  the  request  deck  (See  7.  3).  If  any  comments  (such  as 
"IN  HELIOCENTRIC  ORBIT")  appear  on  the  request  card  of  a 
satellite,  these  comments  are  printed  out  and  the  program  does 
not  attempt  to  determine  the  sub -satellite  point. 

During  one  run  of  PREPINT,  as  many  as  10  reports  may  be 
produced,  one  report  for  each  time  card  (See  7.  3).  If  a  report  time 
is  1200  hours,  the  output  heading  will  be  WEEKLY  SATELLITE 
SITUATION  REPORT.  A  daily  report  is  issued  at  all  other  times 
but  both  types  of  report  are  identical  other  than  heading. 

7.  3  Input 

The  input  to  PREPINT  is  arranged  as  follows:  1)  request 
cards  (<  500);  2)  request  deck  terminator;  3)  time  cards  (<  10); 

4)  time  deck  terminator;  5)  standard  6  or  7  card  element  sets; 
and  6)  element  deck  terminator. 

(1)  The  request  cards  contain  the  following  information: 

Cols.  1-3  Satellite  number 

Col.  7  Comment  indicator  =  0  or  A,  no  comments; 

=  1,  read  comments  from  cols.  21  -  62. 
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Cols.  9-20  Satellite  name 

Cols.  21-62  Comments  to  be  printed  on  report  if  Col. 7 
contains  a  M  1"  punch.  (A  maximum  of  50 
satellites  may  have  comments.  ) 

All  other  columns  on  this  card  are  not  used. 

(Z)  The  request  deck  is  terminated  by  a  card  with  a  11  2M 
punch  in  Col.  7 

(3)  The  time  cards  contain  the  times  at  which  reports  are 
desired.  They  are  punched  as  follows: 

Cols.  1-4  Year 

Cols.  6-7  Month  number 

Col.  8  Blank 

Cols.  9-10  Day  of  month 

Cols.  11-17  Hours  and  minutes  (HHMM-MM) 

Col.  20  Output  unit  indicator  =  0,  output  in  statute  mil 

=  1,  output  in  kilometer 

All  other  columns  are  not  used. 

(4)  The  time  deck  is  terminated  by  a  card  with  a  "  7M  punch 
in  Col.  8, 

(5)  Both  standard  6  card  element  sets  and  standard  7  card 
element  sets  may  be  included  in  the  element  deck. 

(6)  A  blank  card  is  used  as  an  end  of  input  indicator. 

The  ordering  of  the  satellites  on  the  output  is  determined  by 
the  order  of  the  request  deck,  not  by  the  element  set  order.  More 
than  500  sets  of  elements  may  be  read  in  since  the  program  stores 
only  the  elements  for  satellites  in  the  request  deck. 

7. 4  Output 

The  heading  of  each  satellite  situation  report  contains  the 
date  and  time  for  the  information  following  it.  One  line  of  data  is 


1-7-2 


Wolf  Research  and  Development  Corporation 


PREPINT 


printed  for  each  satellite.  If  comments  were  read  from  the  request 
card,  these  comments  are  printed  out  beside  the  satellite  number. 
Otherwise,  the  following  information  is  printed  out  for  each  satellite: 

1)  Identifying  information:  satellite  name  and  number,  and 
element  set  number. 

2)  Sub -satellite  point  at  report  time:  latitude  and  longitude 
west,  in  degrees. 

3)  Inclination,  i,  in  degrees  and  nodal  period,  P^f  in 
minutes. 

4)  Distances  to  apogee  and  perigee  in  statute  miles  or 
kilometers,  depending  on  Col.  20  of  the  time  card. 

5)  Revolution  number  at  report  time  and  T„t,  and  \  _  _ 

N  N  N 

for  this  revolution. 

6)  Eccentricity,  e,  satellite  height  in  statute  miles  or 
kilometers. 

7)  Satellite  latitude  and  longitude  west  in  tenths  of  a  degree. 

The  sentinels  required  by  the  TELTYP  Program  are  supplied 
to  enable  transmission  of  the  above  output  including  all  information 
from  1)  to  4). 

7.  5  Processing 

The  entire  input  deck  is  read  in  and  the  data  stored  in  arrays 
before  any  computations  are  made.  First,  a  maximum  of  500 
request  cards  are  read  in.  The  satellite  identification  and  comments, 
if  any,  from  the  request  deck  are  saved.  Next,  ttie  report  times 
and  output  options  are  read  from  the  time  cards  and  stored.  Finally, 
the  element  deck  is  read  in  and  the  elements  for  all  satellites  in 
the  request  deck  stored.  For  all  element  sets  which  are  out 
of  order,  the  satellite  and  card  numbers  are  printed  out  via  the 
flexowriter  with  an  appropriate  message.  After  the  element  deck 
terminator  is  read  in,  a  check  is  made  to  see  if  there  were  any 
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element  sets  out  of  order.  If  there  were  cards  out  of  order,  the 
program  returns  control  to  the  executive  program.  Otherwise, 
computations  for  the  first  report  are  started. 

After  retrieving  the  first  report  time  from  the  time  array, 
the  teletype  sentinels  and  report  headings  are  written  on  the  output 
tape.  Next,  the  first  satellite  number  is  retrieved  from  the 
request  deck  array.  If  comments  appeared  on  the  request  card  for 
this  satellite,  they  are  written  on  the  output  tape  and  the  next 
satellite  number  is  picked  up  from  the  request  deck  array.  For 
satellites  having  no  comments,  the  elements  are  retrieved  from 
the  element  array  for  computation  of  the  sub -satellite  point  at 
report  time.  First,  the  revolution  number  at  report  time  is  com¬ 
puted  and  all  elements  are  updated  to  the  time  of  the  ascending  node 
for  this  revolution.  If  the  satellite  has  decayed  prior  to  report 
time,  an  appropriate  message  is  written  on  the  output  tape  and  the 
next  satellite  number  is  retrieved  from  the  request  deck  array. 
However,  if  the  satellite  is  still  in  orbit,  the  sub -satellite  point 
at  report  time  and  other  data  for  output  are  computed.,  The  output 
is  converted  to  the  proper  units  and  written  on  the  output  tape.  The 
next  satellite  number  is  retrieved  from  the  request  deck  array  and 
the  computations  continue  until  all  requested  satellites  have  been 
processed. 

The  next  report  time  is  retrieved  from  the  time  array  and  the 
same  procedure  followed  until  reports  have  been  completed  for  all 
requested  times.  The  program  then  returns  control  to  the  executive 
program. 

7.  5.  1  Error  Messages 

1.  SATELLITE _ CARD _ OUT  OF  ORDER 

Program  continues  reading  entire  element  deck  and 
writes  this  message  for  every  card  out  of  order.  After  all  elements 
have  been  read  in,  program  exits  to  executive  routine. 
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2.  SUBROUTINE  ERROR  EXIT  FROM  OCTAL _ 

Subroutine  or  irrecoverable  input -output  error.  Program 
exits  to  executive  routine  if  the  GO  option  is  taken.  If  the  STOP 
option  i3  specified,  the  message  is  retyped.  A  dump  should  be 
taken  if  possible. 
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F  ormulation 


1. 

2. 

3. 

4. 


Nc 


12. 


13. 


14. 


15. 


1  - 


2YI 

P 


a© 


2/3 


ao  =  *  . 058672947  * 

qQ  =  ao  (!  -  eo> 

At  =  PNq  AN+  CQ  AN2  +  dQ  AN3 


5. 

PN  =  PNo  +  2C0AN+3d0AN 

6. 

CN  =  C0  +  3d  AN 

7. 

4N  =  %  +  9  A  tN 

8. 

qN  =  %  +  9n  AtN  + 

1  -  a.  2 

—  9o  AtN 

9. 

WN  =  “0  +  “0  AtN  + 

1  "  A*  2 

T  Wo  AtN  ’ 

0  £  un  <  2n 

10. 

«N  =  fio  +  “oAtN  + 

7^0  AtN2  ’ 

0  <  nN<  2n 

11. 

P  PN 

aN  =  - an b— 

_ 

1  - 


N 


=  ( 


N  N 
2n 


aN 


2/3 


e  =  1  -  7 
N  a 


.  058672947 
9N 


N 


N 


N 

(.  086917)  (a^)"7^2  (5  cos2i-l) 

~  2.2 

(1  •  eN  > 

-7/2 

(-.  17383)  (am)  '  (cos  i) 

....  n  2.2 

(i  -  eN  ) 


16. 


9N  "  aN  ( 1  -  eN^ 
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17, 

18, 

19, 

20. 
21. 
22. 

23. 

24. 

25. 

26. 

27. 

28. 

29. 

30. 


en  = 

-2  tan  ^ 

eN 

eN 

mn  = 

en-«n 

sin  En 

.  UN  > 
tan  — s — ) 


M  (t)  =  Mn  + 


2n  •  a  t 

PN 


Solve  for  E(t)  :  M(t)  =  E(t)  -  sin  E(t) 


v  =  2  tan 


-1 


( 


4”N  tan  ) 


*N 


•  1  7 

K  =  v  +  0)n  +  “N  At+  ~  WN  At 

'  .  -1  .  .  . 

<p  =  sin  ( sin  i  •  s in  fi  ) 

,  ,  -1  .  tan  d/  v 

4>  =  tan  (  .  99329985  * 


R 


. 9966443 


l/  1-  .  00670015  •  cos2<j> 

/  I  2 

aN  ( i_  ®N 


U  +  eN)cos  v 


H  =  r  -  R 


.  -1  ,  COS  1  v 

sin  (  - tv  ) 

'  cos<|>  ' 


A  .  -1  /  tancb 

AX  =  sm  (  — T — i 
v  tan  i 

N 


AX  =  A  \'+  At  (On  -  6.  3003883)  +  -L-  fi  N  At^ 


31. 

N 

z 

/C 

0G  ~  nN  . 

0  < 

X  N  <  360 

32. 

0) 

II 

^  N ”  9 

0  < 

X  g  <  360 

Apogee  =  (2a^T  -  -  1)  K  where  K  is  km/  e.  r.  or  sm/  e,  r. 

conversion  factor 
Perigee  =  (qN  -  IV  •.  K 


34. 


Course  =  tan 


(107.  08829)  (l^^N  cosy)^^  /  6.  3003883  cos^a^l  -  eN 

Y  aN ^  eN^  *  +  eN  cos  v 


(107.  08829)  (1  +  eNcos  v)  cq8  p 

^  aN(t-  ®N2) 
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7.  7 _ Glossary 


Location 

Symbol 

Meaning 

AA 

Comment  from  request  card 

AA1 

Array  for  storage  of  comments  AA 

ANGL 

Array  for  storage  of  inclination  angles  (i) 

ANGLE 

i 

Inclination  angle 

ANOMA 

Pa 

Anomalistic  period  in  days 

APOGEE 

Apogee  distance 

AXIS 

a 

Semi-major  axis 

AZIB 

p 

Angle  (3,  see  diagram 

BB 

Comment  from  request  card 

BB1 

Array  for  storage  of  comments  BB 

C 

c 

Z 

Rate  of  change  of  period  in  days/ rev. 

CA 

Array  for  storage  of  c  terms 

CC 

Comment  from  request  card 

CC1 

Array  for  storage  of  comments  CC 

CHECK 

sin  (j/ 

Sine  of  geocentric  latitude  of  subsatellite  point 

COURSE 

Course  in  radians 

D 

d 

First  derivative  of  c  in  days/rev. 

DA 

Array  for  storage  of  d  terms 

DAE 

Array  for  storage  of  epoch  times  (tQ) 

DAP 

Array  for  storage  of  decay  times  (t^) 

DAYE 

t 

o 

Time  of  epoch  in  days  of  year 

DAY 

Day  of  month  of  report 

DAYN 

Number  of  whole  days  in  tj^ 

DAYP 

/ 

*6 

Epoch  time  of  decay  equation 

DD 

Comment  from  request  card 

DD1 

Array  for  storage  of  comments  DD 

DELLOT 

Delta  longitude  of  node  excluding  precession 
of  node  for  this  revolution 

DELONG 

AX 

Difference  in  longitude  from  node  to 
subsatellite  point 

DELTAT 

At 

Time  from  ascending  node  of  updated 
revolution  to  report  time  (^report  "  tjsj) 

DELTTN 

AtN 

Time  elapsed  from  epoch  to  last  ascending 
node  prior  to  report  time  { tjsj  -  tQ) 
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DEPOCH 

DTIM 

DTIME 


Time  of  epoch  in  Smithsonian  days 

Array  for  storage  of  report  times  in 
Smithsonian  days 

Report  time  in  Smithsonian  days 


E 

El 

EE 

EE1 

EN 

EPOK 

EPOKR 

ERAD 


e 


"N 


No 


Eccentricity 

Array  for  storage  of  eccentricity 
values  (e) 

Comment  from  request  card 

Array  for  storage  of  comments  EE 

Eccentric  anomaly  at  the  node 

Array  for  storage  of  epoch  revolution 
numbers  (NQ) 

Epoch  revolution  number 

mm 

1+  e 


ES 

E(t) 

FEPOCH 

FF 

FF1 

FRACT 

FTIM 

FTIME 

FORDC 

c 

FORDE 

FORDP 

PN 

c 

GEGL  ^ 

GEOCL 

<t>' 

GEOGL 

4> 

GG 

GG1 

H 

X  N 

HLS 

XS 

HT 

H 

Eccentric  anomaly  at  time  of  report 
Time  of  epoch  in  fractional  part  of  day 
Comment  from  request  card 
Array  for  storage  of  comments  FF 
In  fractional  part  of  t^ 

Array  of  fractional  days  of  report  times 

Fractional  part  of  day  of  report 

Nodal  c  term  from  7  card  element  set 

Column  80  of  element  cards  (E  in  col.  80 
indicates  7  card  element  set  ) 

Nodal  period  from  7  card  element  set 

Latitude  of  the  subsatellite  point  in  degrees 
Geocentric  latitude  of- sub  satellite  point 
Geodetic  latitude  of  sub  satellite  point 
Comment  from  request  card 
Array  for  storage  of  comments  GG 

Longitude  of  the  node 
Longitude  of  the  sub  satellite  point 
Height  of  satellite  above  earth 
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ID 

IELNO 

ILN 

IT 


Element  card  number 
Element  number 

Array  for  storage  of  element  numbers 

Number  of  times  at  which  reports  are  to  be 
issued 


KAZ 

KIL 

KILO 

KILOM 

MAGIN 

MAGOUT 

MESS 

MO 

N 

N1 

NAT 

NATNO 

NEOGL 

NLS 

NN 

NO 

NREV  N 

NRSC 

NYEAR 

NZIB 

PEDOT 

PERDOT  £> 

PERI 

PERIG  co 

PERGEE 


Day  for  which  report  is  issued 
Array  for  storage  of  output  options 

Output  option  (km  or  sm)  for  report 

^  .  f=  1  output  in  statute  miles 

Output  option |=0  ,n  kilometerg 

Input  tape  number 
Output  tape  number 

"Out  of  Order"  message  for  flexowriter 
Month  number  of  report 


Number  of  satellites  requested  for  report 

A  £  ,  f=0no  comments 

Array  of  comment  indicators-!  _ 


Satellite  number 


1  print  comments 
for  this  satellite 


Array  for  storage  of  satellite  numbers 
Latitude  of  subsatellite  point  in  degrees 
Longitude  of  sub  satellite  point  in  degrees 

Number  of  satellites  having  comments  on 

request  card  r  _  ^  , 

=  0  no  comments  on  card 

Request  card  switchJ  =  1  store  comments  from 

card 

=  2  end  of  request  deck 

Revolution  number  at  time  of  report 

Number  of  element  sets  which  are  out  of 
order 


Year  of  report 
.Course  in  degrees 


Array  for  storage  of  co  values 
First  derivative  of  argument  of  perigee 
Array  for  storage  of  co  values 
Argument  of  perigee 
Perigee  distance 
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PERIOD 

Nodal  period  in  minutes 

PNOD 

Array  for  storage  of  nodal  periods  (P^) 

PNODL 

PN0 

Nodal  period  in  days/rev. 

PRDDO 

Array  for  storage  of  l/ 2  of 

PRDDOT 

1/2  « 

One  half  2nd  derivative  of  argument  of  perigee 

Q 

q 

Perigee  distance  in  earth  radii 

QA 

Array  for  storage  of  q  values 

QDDO 

Array  for  storage  of  l/ 2  q  values 

QDDOT 

1/2  q 

Second  derivative  of  argument  of  perigee 

QDO 

Array  for  storage  of  q  values 

QDOT 

q 

First  derivative  of  argument  of  perigee 

R 

AN 

Revolutions  since  epoch 

RADDO 

Array  for  storage  of  l/2  £2  values 

RADDOT 

1/2  fi 

One  half  2nd  derivative  of  right  ascension  of 
the  ascending  node 

RADOT 

Array  for  storage  of  £2 

RASDOT 

£2 

First  derivative  of  right  ascension  of  the 
ascending  node 

RAX 

57.  2957'/  95  (deg/rad) 

RIGHT 

Right  ascension  of  ascending  node  in  degrees 

RITAS 

Array  for  storage  of  £2  values 

RITAS  C 

£2 

Right  ascension  of  the  ascending  node 

RJ 

r 

Distance  from  center  of  earth  to  satellite 

RO 

Ro 

Radius  of  earth  at  sub  satellite  point 

SNAME  1  ] 
SNAME2  j 

[ 

Satellite  name 

SNAME  A" 
SNAME  B 

[ 

Arrays  for  storage  of  satellite  names 

SOLMN 

mn 

Mean  anomaly  at  the  node 

SOLMS 

M(t) 

Mean  anomaly  at  time  of  report 

SUBEN 

XN 

Longitude  of  the  node  in  degrees 

TIM 

Time  of  report  in  hours  and  minutes 

TIME 

Array  of  times  at  which  reports  are  to  be  issued 

TME 

Time  of  report  in  hours  and  minutes 

TIZ 

Year  of  report 

TN 

*N 

Time  of  nodal  crossing  for  revolution 
number  of  report 
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u 


Argument  of  latitude  of  satellite  at 
time  of  report 


c 


I 


VEK  v 

Y  CONS 

Y  CONST  e 

YEAE 

YEA  RE 

YEARP 

YEAP 

YEAR 

YR 

zate| 

ZETE  f 


True  anomaly  at  time  of  report 

Array  for  storage  of  0Q  values 

Sidereal  time  at  Greenwich  at  beginning 
of  year  of  report 

Array  for  storage  of  epoch  years 

Year  of  epoch 

Year  of  epoch  of  decay  equation 

Array  for  storage  of  epoch  years  of  decay 

Year  of  report 

Last  digit  of  year  of  report 

Satellite  name 


f 
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Computes  Smithsonian  Day 
Given  Month  Number,  Day, 
and  Year 


Retrieve  0O 

Given  Last  Digit  of  Year 
Read  Element  Cards 
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■A 


No/  End  of 

Elements  ?y 


.Yes 


No 


Sot.  No. 
in  Request 
List  ? 


Out  of  Ords  yf# 
Counts r 
=  0  ? 


Stors 
Elements 
in  Arroys 


Rood  Next 
Element 
Card 


Error  Ms$i 

(SUBROUTINE 
ERROR 


I 


EXIT 


No/ 


Element 
Cards  in 
Sequence 


Yes 


Write  Msg: 

Store 

OUT  OF 

Elements 

ORDER 

in  Arrays 

Update 
Out  Of  Order 
Counter 


A3 


KEV~\ 

f  SD  AY  j 


Converts  Smithsonian  Day 
to  Year,  Month,  Day 


Finishes  Element  Read 


Prints  Heading  for  Output 
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Writ* 

Gtntrol 

Output 

Hsadlngt 


First  Sot. 
No.  from 
Rtqusst  List 


KEY: 


A5)  Compute  Position  for  This  Satellite 


Check  to  See  if  All  Satellites  Have 
Been  Processed 
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Check  to  See  if  All  Satellites 
Have  Been  Processed 
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KEY: 


Start  Processing  Next  Satellite 


Retrieve  Time  for  Next  Report 
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8.  i  MAKETAPE,  Make  Input  Tape  for  TELTYP 

8.  2  Function 

The  program  MAKETAPE  produces  a  magnetic  output 
tape  incorporating  the  message  sentinels  required  by  the  TELTYP 
program.  Only  one  message  is  produced  by  the  program.  An 
optional  control  feature  will  produce  the  message  broken  into 
90-line  segments. 

8.  3  Input 

Input  data  originates  from  the  Schedule  Tape.  This  input  is 
moved  by  the  system  from  the  Schedule  Tape  to  the  System  Data 
Tape  (logical  0). 

Two  control  cards  are  used  in  addition  to  the  data  cards 
containing  the  message  to  be  converted.  The  following  should 
be  in  cols.  17-24: 

1.  TELEFORM 

2.  F  INDATA 

8.  3.  1  Description  of  Control  Cards 

1.  TELEFORM 

This  card,  if  present,  will  precede  the  data  deck.  When 
encountered,  it  will  signal  the  program  to  break  the  message  into 
90-line  segments. 

2.  F  INDATA 

This  must  be  the  last  card  of  the  data  deck.  The  program 
exits  to  the  executive  program  when  this  card  is  intercepted. 

8.  4  Output 

The  output  tape  (logical  1 1)  created  by  this  program  is  in  a 
form  acceptable  for  subsequent  conversion  by  the  TELTYP  program. 
A  hard  copy  of  the  message  with  its  sentinels  may  be  obtained  by 
printing  through  the  UBC  using  data  select  one.  For  a  discussion 
of  the  sentinels  used,  the  writeup  of  the  TELTYP  program  should 
be  consulted. 
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Proces  sing 

MAKETAPE  reads  data  into  core  from  logical  tape  zero. 
Each  card  image  is  scanned  for  the  control  information  described 
under  the  input  section.  If  TELEFORM  is  found,  an  internal 
switch  is  set  to  cause  line  counting.  If  the  program  is  in  the  line 
counting  mode,  each  group  of  90  lines  will  be  preceded  by  the  be¬ 
gin  sentinel  and  followed  by  the  end  sentinel  required  by  the 
TELTYP  program. 

All  data  read  into  core  will  be  written  onto  the  output  tape, 
with  the  exception  of  right-adjusted  blank  fields.  The  program 
will  exit  to  the  executive  routine  when  the  FINDATA  control  card 
is  intercepted. 

It  is  generally  expected  that  the  TELTYP  program  will  be 
used  immediately  following  this  program  or,  at  least,  before 
logical  tape  eleven  is  wrapped  up  by  the  system. 
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Find  First  Non-Blank  Field  On  Right  of  Input  Card 
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9, 1  XYZLAR,  Look  Angle  Report  From  x,  y,  z,  Coordinates 

9.  2  Function 

The  program  is  used  for  predicting  the  position  of  a  satellite 
in  terms  of  the  tracking  coordinates  of  a  particular  station.  The 
program  is  especially  useful  for  deep  space  probes. 

The  position  of  the  satellite  is  defined  in  terms  of  the  right 
ascension,  declination,  azimuth,  elevation,  and  slant  range  at  the 
prediction  time,  for  a  particular  station.  The  elevation  and  illumin¬ 
ation  angles  of  the  sun  are  also  computed  to  determine  if  the  satellite 
is  visible. 

Input  options  exist  to  consider  the  restrictions  imposed  by  the 
type  of  observing  equipment  used.  No  data  will  appear  for  a  re¬ 
quested  prediction  time  unless  these  limitations  have  been  met. 

The  ephemeris  data,  used  in  the  calculations  of  the  look  angles, 
may  be  read  from  an  ephemeris  tape  previously  written  by  either 
the  Unified  Encke  Differential  Correction  Program  (accuracy, 
approximately  ten  lunar  distances),  or  by  the  Interplanetary  Program. 
If  the  ephemeris  tapes  are  not  available,  the  data  may  be  read  in 
from  punched  cards.  Predictions  for  more  than  one  station  may  be 
based  on  the  same  ephemeris  data. 

9. 3  Input 

An  input  set  consists  of  a  standard  station  card  for  the  observ¬ 
ing  station,  a  request  card,  and  the  ephemeris  information  from  an 
ephemeris  tape  or  punched  cards  containing  the  ephemeris  data 
followed  by  a  blank  card.  Each  input  set  results  in  a  look  angle 
schedule  for  the  station  specified.  If  look  angle  schedules  are  required 
for  the  same  satellite  but  different  observing  stations,  additional 
pairs  of  cards,  composed  of  a  station  card  and  a  request  card,  may 
be  added  to  the  input  deck.  If  new  ephemeris  data  is  to  be  entered 
from  punched  cards,  the  station  card  of  the  next  input  set  must  con¬ 
tain  a  negative  station  number.  Any  number  of  input  sets  may  be 
entered.  The  last  set  must  be  followed  by  a  blank  card  which  is  in 
addition  to  the  blank  card  following  the  ephemeris  data  cards. 
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The  format  of  the  request  card  follows:  columns  1  to  4  contain 
the  year  of  the  desired  predictions;  columns  5  to  7  contain  the  day 
of  year;  columns  8  and  9  contain  the  hour;  columns  10  and  11  con¬ 
tain  the  minutes;  columns  12  to  17  contain  the  base,  or  starting  time, 
for  the  desired  predictions. 

The  time  increment  used  is  determined  by  the  ephemeris 
data.  Columns  25  to  34  contain  the  maximum  time  increment  or  the  time 
range  for  predictions.  This  time  is  expressed  in  minutes  from  the 
base  time  of  the  request.  Any  ephemeris  data  beyond  this  time  range 
will  be  ignored.  If  columns  25  to  34  are  blank,  the  program  will  cal¬ 
culate  predictions  for  all  ephemeris  data  supplied.  Program  option 
switches  are  specified  in  columns  44  to  47.  A  1  punch  in  the 
respective  column  will  set  an  internal  switch.  A  1  punch  in  column 
44  indicates  that  the  ephemeris  data  will  come  from  the  ephemeris 
tape  for  this  set  of  input.  If  column  44  is  blank  the  program  expects 
ephemeris  data  from  ephemeris  cards.  A  1  punch  in  column  45 
indicates  that  only  visible  passes  are  desired.  If  a  1  is  punched  in 
column  46,  negative  elevations  will  be  acceptable.  A  1  is  punched  in  ^ 
column  47  if  punched  ephemeris  cards  are  desired  as  output. 


c 


9.  3. 1  Ephemeris  Cards 

The  ephemeris  cards  contain  the  time  increment  from  the  base 
time  specified  on  the  request  card  and  the  inertial  geocentric  coord¬ 
inates  of  the  satellite.  All  data  is  in  floating  point.  Columns  1  to  14 
contain  the  time  increment,  columns  15  to  28  contain  the  x-coordinate, 
columns  29  to  42  contain  the  y- coordinate,  and  columns  43  to  56  contain  the 
z-coordinate  in  earth  radii.  Ephemeris  cards  are  orderedby  increasing 
time  increment.  A  satellite  identification  card  with  the  alphanumeric 
satellite  name  punched  in  columns  1  to  1  6  must  precede  the  ephemeris  cards. 


9.  3.  2  Ephemeris  Tape 

The  ephemeris  tape  can  be  obtained  from  two  sources:  1)  the 
Unified  Encke  Differential  Correction  Program  and;  2)  the  Inter¬ 
planetary  Program.  Both  programs  were  written  by  Aeronutronic 
a  division  of  the  Ford  Motor  Company.  In  the  former  case,  logical 
tape  10  is  the  desired  tape  and  in  the  latter,  the  required  tape  is 
logical  9.  The  format  for  both  tapes  follows  : 
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Block  1.  Contains  the  alphanumeric  satellite  name  in 
the  first  two  words. 

Block  2  thru  N.  Contains  a  time  increment  from  the  base 
time  and  x,  y,  z,  x,  y ,  z  in  the  inertial  geo¬ 
centric  coordinate  system  at  that  particular  time  . 
Each  value  is  contained  in  one  full  computer  word 
and  is  in  the  floating  point  format.  Eighteen 
groups  of  these  seven  values  plus  two  zero  words 
make  up  each  one  hundred  and  twenty- eight  word 
block.  The  tape  is  considered  to  be  terminated 
when  the  first  word  of  a  seven  word  set  is  filled 
with  Z*s. 


9.  4  Output 

If  a  1  is  punched  in  column  47  of  the  XYZLAR  request  card, 
the  ephemeris  data  will  be  punched  on  cards  in  the  same  format  as 
the  input  ephemeris  data  when  the  binary  ephemeris  tape  is  used 
for  input.  The  satellite  name  appears  on  the  first  card. 

Printed  output  contains  all  TELTYP  control  functions,  therefore, 
transmission  of  the  output  is  poss  ible.  The  first  line  is  the  alphanumeric 
satellite  name.  The  second  line  is  the  comment  LOOK  ANGLES  FOR  followed 
by  the  alphanumeric  station  name.  The  third  and  fourth  lines  are  head¬ 
ing  lines  describing  the  output  data  for  each  prediction  time.  Each 
data  line  contains  the  day  of  year,  hour,  minute,  and  fraction  of 
minute  of  the  search  point,  the  predicted  right  ascension,  declina¬ 
tion,  azimuth,  and  elevation  in  degrees  and  slant  range  in  kilometers. 
These  quantities  define  the  position  of  the  satellite.  The  elevation 
and  illumination  angles  of  the  sun  complete  the  data  line  and  deter¬ 
mine  if  the  satellite  will  be  visible  at  the  time  of  the  prediction. 

9.  5  Processing 

XYZLAR  predicts  the  right  ascension,  declination,  azimuth, 
and  elevation  angles  for  a  given  satellite  as  well  as  the  elevation  and 
illumination  angles  of  the  sun  at  the  requested  prediction  time. 
Restrictions  on  the  observing  capability  of  the  station,  specified  on 
the  request  card,  are  considered.  Any  restrictions  that  are  not  met 
will  cause  computations  to  cease  for  that  particular  prediction  time. 
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and  no  printed  output  will  appear.  The  program  will  begin  pro¬ 
cessing  the  next  ephemeris  position.  In  addition,  when  and  if  the 
maximum  time  increment  is  exceeded,  the  program  will  ignore 
the  remaining  ephemeris  data  of  that  input  set.  The  next  request 
is  then  processed. 

If  an  input  set  utilizes  ephemeris  cards,  all  of  the  ephemeris 
data  is  written  in  binary  on  logical  tape  seven  before  processing 
begins.  However,  an  input  set  may  originally  include  an  ephemeris 
tape  mounted  on  logical  seven  and  in  that  case,  processing  will 
begin  immediately. 

The  program  adds  the  specified  base  time  from  the  Request 
card,  and  the  time  increment  from  the  ephemeris  data  to  obtain 
the  time  of  the  search  point.  The  sidereal  time  at  Greenwich  at 
prediction  time  and  the  coordinates  of  the  station  in  a  fixed  system 
are  found  in  order  to  compute  the  slant  range.  The  right  ascension 
and  declination  of  the  satellite,  the  sidereal  time  at  the  station,  the 
hour  angle,  zenith  distance,  and  elevation  angle  are  computed  for  the 
prediction  time. 

If  negative  elevation  angles  are  acceptable,  the  program  con¬ 
tinues  on  to  compute  the  azimuth.  If,  however,  negative  elevation 
angles  are  not  acceptable,  a  test  is  made  and  if  the  angle  is  found 
to  be  negative  the  program  returns  to  process  the  next  group  of 
data. 

Visibility  at  prediction  time  is  determined  by  computing  the 
elevation  and  illumination  angles  of  the  sun.  If  the  elevation  angle 
is  less  than  -4  degrees,  and  the  illumination  angle  is  greater  than 
-4  degrees,  then  the  satellite  is  visible.  If  only  visible  passes  are 
required,  these  conditions  must  be  met. 

Output  quantities  at  each  prediction,  or  search  point,  time  in¬ 
clude  the  time,  right  ascension,  declination,  azimuth,  elevation,  and 
slant  range  of  the  satellite,  and  the  elevation  and  illumination  angles 
of  the  sun. 

The  program  then  proces ses  themext  group  of  data.  If  the 
station  number  is  positive,  the  program  computes  another  search 
ephemeris  for  the  same  satellite  in  the  manner  stated  above,  but 
for  this  new  station.  If  the  station  number  is  found  to  be  negative 
new  ephemeris  information  is  assumed.  If  the  station  card  is  blank, 
control  is  returned  to  the  executive  program. 
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Punched  card  output,  if  specified,  is  under  control  of  a 
PATH  switch  which  eliminates  multiple  punching  of  the  same 
ephemeris  data.  This  switch  also  controls  the  production  of  an 
ephemeris  tape  from  a  set  of  ephemeris  cards.  This  switch  equals 
one  (1)  for  the  first  time  through  the  program  for  a  particular  set 
of  ephemeris  data,  and  two  (2)  for  each  subsequent  pass  through 
the  program  for  this  same  data.  It  can  be  reset  to  one  by  reading 
a  negative  station  number.  Thus,  ephemeris  cards  are  punched 
or  an  ephemeris  tape  made  only  on  the  first  pass  through  the  pro¬ 
gram  for  that  particular  set  of  ephemeris  data. 

9.  5.  1  Error  Message 

If  the  program  is  unable  to  read  the  ephemeris  tape,  the 
comment  EPHEMERIS  TAPE  TROUBLE  will  be  written  on  the 
output  tape.  In  addition,  the  comment  PROGRAM  TERMINATED 
DUE  TO  EPHEMERIS  TAPE  TROUBLE  will  appear  on  the  Flexo, 
and  control  will  return  to  the  executive  routine. 
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9.  6  F ormulation 

1.  <j/  =  tan"1  (.  99329985  tan  <j>) 

2.  R  =  [.  9966443/(1  00670015  cos2  <)>)1//2  +  H/6378174]  6378. 174 


3.  Compute  station  coordinates  in  rotating  geocentric  system. 

Xgtat  =  R  cos  ^  cos  4* 

Ystat  =  R  sin  \  cos 

zstat  =  R  sin 

4.  Convert  starting  or  base  time  to  days  and  fractional  days. 
ta  -  days  4  hours/24  +  minutes/l440  +  secs/86400 


Find  time  of  computed  point. 


6. 

7. 

8. 


10. 


11. 


t  =  t-  +  t. 

C  3-1 

If  t •  >  t  return  to  process  next  input  set. 
i  max  r  r 

r  =  x2  +  y2  +  z2 

eG  =  0O +.  98564735  td  +  360.  985647  tf  0  <  0G  <  360° 

Compute  station  coordinates  in  inertial  geocentric  system 
*  =  xstat  cos  0G  -  Ystat  sin  eG 
7  =  xstat  sin  eG  +  Ystat  cos  eG 
z  =  zstat 

p  =  [  (x-x)2  +  (y  -  y)2  +  (z  -  z-)2]1/2 

where  x,  y,  and  z  are  geocentric  coordinates  from  the  ephemeris 

data. 

cos  a  =  (x  -  x)/[  (x  -  x)2  +  (y  -  y)2]1//2 
a  =  tan  _1  [  (y  -  y)/(x  -  x)] 

If  cos  a  negative,  a  =  a  +  tt.  Otherwise,  0  <  a  <  360° 

sin  6  =  (z  -  z’)/ p 

6  =  sin~l  (sin  6) 
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12. 

0ST 

=  0G+  \ 

13. 

HAs 

=  eST  -  a  -  0  <  HAS  <  360° 

14. 

P  = 

cos  1  (sin  <j>  sin6  +  cos  <)>  cos  6  cos  HAg) 

15. 

h  = 

it/  2-0 

If  negative  elevations  acceptable,  go  to  16. 

If  negative  elevations  not  acceptable  and  h  <  0:  Go  to  29. 

16.  sin  Az  =  (cos  6  sin  HAg/sin  (3 

cos  Az  =  (-sin6  cos  <J>  +  cos  6  si n<\>  cos  HAg)/ sin  (3 

Az  =  tan  (sin  Az/cos  Az) 

If  cos  Az  <  0,  Az  =  Az  +  ir.  (0  <  Az  <  360°) 

17.  Begin  visibility  computations. 

lQ  (t)  =  L0  +  .  98564735  tc  +  L  91665  sin  (.  98564735  tc  -  c14) 

18.  a  Q  =  j£0(t)  -  2.  46682  sin  (2ijt)) 

19.  6q  =  tan"1  (.  4336608  sin  aQ) 

20.  0  (t)  =  eG  +  x 

21.  h0  =  sin"1  [  sincj)  sin60  +  cos  <j>  cos  6Q  cos  (0(t)  -  aQ)] 

22.  agc  =  tan-1  (y/x) 

23.  SDg(.  =  sin-1(z/r) 

t  =  cos"1  (-cos  (SDgc)  -  cos  6Q  cos  (a9  -  agc)  -  sin(SDgc)- sin6e) 

24.  t|  =  sin-1  (l/  r) 

If  only  visible  passes  desired,  go  to  25.  Otherwise,  go  to  27. 

25.  If  >  -4  degrees,  pass  not  visible:  Go  to  29. 

26.  I  =  £  -  t| 

If  I  <  -  4  degrees,  pass  not  visible:  Go  to  29.  Otherwise  Go  to  28. 

27.  I  =  §  -  T) 
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28.  Output  of  time,  a,  6,  Az,  h,  p  ,  hQt  I. 

29.  Pick  up  next  group  of  ephemeris  data,  Go  to  5. 
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9.  7  Glossary 


Location 

Symbol 

Meaning 

AA 

xstat 

x  coordinate  of  station  in  rotating 
geocentric  system 

BB 

ystat 

y  coordinate  of  station  in  rotating 
geocentric  system 

C14 

C14 

Difference  between  longitude  of  sun 
and  argument  of  perigee  of  sun 

C2PI 

2tt 

Constant  6.  28318530 

CAPR 

R 

Radius  of  earth  at  station 

CAZ 

cos  Az 

Cosine  of  azimuth  angle  of  satellite 

CC 

zstat 

z  coordinate  of  station  in  rotating 
geocentric  system 

CRA 

cos  a 

Cosine  of  right  ascension  of  predicted 
sighting 

CRAGC 

cos  a  „ 
gc 

Cosine  of  a^c 

CXI 

cos  £ 

Cosine  of  £ 

CZD 

cos  (3 

Cosine  of  zenith  angle 

ELEVA 

h 

Elevation  angle  of  sat.  (predicted) 

ETA 

r\ 

Intermediate  calculation  for  illumination 

FMIN 

Fraction  of  minute  of  computed  point 

HITE 

H 

Height  of  station 

HSUNJ 

ho 

Elevation  of  su-n 

IDAY 

Day  of  month  of  computed  point 

IDCI 

Symbolic  name  for  input  tape 

IDCO 

Symbolic  name  for  output  tape 

IHM 

Hour,  min,  fractional  minute  of 
computed  point 

IPUNCHC 

Symbolic  tape  name  for  intermediate 
punch  card  tape 

ISSW4 

1,  Ephemeris  tape 

0,  Ephemeris  cards 

ISSW5 

1,  Only  visual  passes  desired 

0,  All  passes  desired 

ISSW6 

1,  Only  positive  elevations  desired 

0,  All  elevations  desired 
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ISSW7 

I#  punch  cards  from  ephemeris  tape 

0,  don't  punch  cards 

ISW 

1#  for  first  pass  through  program  for 
a  particular  set  of  ephemeris  data 

2,  for  each  subsequent  pass  through 
program  for  same  ephemeris  data 

NS  TA 

Station  number 

ox 

*.<*> 

Longitude  of  the  sun  at  prediction  time 

PHI 

4> 

Geodetic  latitude  of  station 

PHIP 

4>' 

Geocentric  latitude  of  station 

PI 

7 r 

Constant:  3*  14159265 

RAD 

Constant:  degrees/radian 

RAV 

r 

Distance  of  satellite  from  center  of  earth 

S 

HAS 

Hour  angle  of  satellite 

SAZ 

sin  Az 

Sine  of  azimuth  angle  of  satellite 

SD 

Day  of  year  of  base  time  from  Request 
card 

SDEC 

sin  6 

Sine  of  declination 

SDGC 

SDgc 

Intermediate  calculation 

SH 

Hour  of  base  time  from  Request  card 

SHSUNJ 

8  in  h© 

Sine  of  elevation  of  sun 

SLRANG 

P 

Slant  range 

SM 

Minutes  of  base  time  from  Request  card 

SS 

Seconds  and  fraction  of  seconds  from 
Request  card 

STIME 

*a 

Base  time  of  predictions 

STNM1,  STNM2 
ST.NM3 

Alphanumeric  station  name 

TA 

4i 

Time  increment  from  ephemeris  data 

*c 

L  +  ta  Time  of  computed  point 

TD 

*<1 

Prediction  time  in  days 

TDECS 

tan  6^ 

Tangent  of  declination  of  sun 

TF 

4f 

Prediction  time  in  fractional  days 

TH 

4h 

Hour  of  prediction  time 

THETG 

eG 

Sidereal  time  at  Greenwich  at 
prediction  time  in  degrees 

THETST 

eST 

Sidereal  time  at  the  station 

THTGT 

0(t) 

Sidereal  time  at  station 
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TMAX 

^max 

Maximum  time  increment  from  base 
time 

TPHIP 

tan  <J>/ 

Tangent  of  geocentric  latitude  of  station 

TRA 

tan  a 

Tangent  of  right  ascension  of  predicted 
sighting 

X 

X 

Geocentric  x  coordinate  of  satellite  in 
earth  radii  from  ephemeris  data 

XAZ 

Az 

Azimuth  angle  of  satellite 

XBAR 

X 

x  coordinate  of  station  in  inertial 
geocentric  system 

KDECS 

6 

o 

Declination  of  sun 

XI 

Intermediate  quantity 

XIA 

i 

Illumination  angle  (sun). 

XL 

X 

Longitude  of  station 

XLSUN 

Celestial  longitude  of  sun  at  start  of  year 

XRASUN 

ao 

Right  ascension  of  sun 

XTHETG 

eG 

Sidereal  time  at  Greenwich  at  prediction 
time,  in  radians 

XZD 

P 

Zenith  angle 

Y 

y 

Inertial  geocentric  y  coordinate  of 
satellite  in  earth  radii,  from  ephemeris 
data 

YR 

Year  of  base  time  of  predictions 

YBAR 

y 

y  coordinate  of  station  in  inertial 
geocentric  system 

Z 

z 

Inertial  geocentric  z  coordinate  of 
satellite  in  earth  radii,  from  ephemeris 
data 

ZBAR 

z 

z  coordinate  of  station  in  inertial 
geocentric  system 

ZDEC 

6 

Predicted  declination  of  satellite 

ZRA 

a 

Right  ascension  of  predicted  sighting 

ZRAGC 

Qgc 

Right  ascension  of  satellite 
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KEY: 

© 


Obtain  Ephemeris  Data 
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Obtain  Next  Input  Set 


Continue  Computations 
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10.  1 


10.  2 


10. 


3 


POSE,  Point  Search  Ephemeris 
Function 

When  a  radar  picks  up  an  unknown  object,  one  may  have 
for  some  reason,  the  suspicion  that  it  could  have  been  an  un¬ 
identified  satellite.  If  this  is  the  case,  one  likes  to  search  for 
it.  All  orbital  elements,  however,  are  completely  unknown. 
Disregarding  the  recession  of  the  line  of  the  nodes  and  the  pre¬ 
cession  of  the  line  of  apsides,  which  is  permissible  over  one  or 
two  revolutions,  once  can  expect  that  the  object  (if  it  should  be 
a  satellite)  will  come  close  to  the  same  point  in  inertial  space 
again,  one  revolution  later. 

The  program  computes  a  search  ephemeris  for  a  given 
station  for  this  point  in  space. 


Input 


The  input  consists  of:  (1)  a  request  card,  (2)  a  standard 
observation  card,  (3)  one  or  more  standard  station  cards  and  (4)  an 
option  card. 

The  information  contained  on  the  request  card  is  as  follows: 


Cols.  1-5  T- start  in  minutes  (DDDD.  ) 

the  smallest  orbital  period  expected 
(usually  80  mins.  ) 

Cols.  6-8  At  in  minutes  (DD.  )  -  the  time  increment  added 
to  the  orbital  period  (usually  5  mins.  ) 

Cols.  9-13  T-stop  in  minutes  (DDDD.  )  -  the  largest  orbital 
period  expected. 

Col.  14  lout  -  the  output  option  desired 
1  =  long  form 
0  =  short  form 
(explained  in  output  section) 

A  decimal  point  should  be  punched  within  fields  one,  two  and  three. 
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10.  4 


The  option  card  is  used  to  initiate  the  read -in  of  a  new 
request  deck  or  to  terminate  the  program.  If  a  —1  is  punched 
in  cols.  1-4,  the  program  will  read  in  a  request  card,  obser¬ 
vation  card,  station  card(s)  and  an  option  card.  If  a  zero  or 
blank  field  is  read  from  the  option  card  the  program  will  be 
terminated. 


Output 


The  output  consists  of  a  look-angle  schedule  for  each 
station  requested.  The  long  form  of  output  includes  the  following 
data: 


a) 

b) 

c) 

d) 

e) 

f) 

g) 

h) 

i) 

j) 

k) 


Station  information:  latitude,  longitude  and  height 

Observed  time  in  days,  hours,  minutes  and  seconds  (GMT) 

Observed  elevation,  azimuth  and  slant  range 

Value  of  0q-  sidereal  time  at  Greenwich 

Value  of  9  -  sidereal  time  at  the  station 

s 

Distance  of  station  from  center  of  the  earth  (CAPR)  | 

Geocentric  station  latitude 

Station  1  s  Cartesian  coordinates  where  x  and  y  are  in  the 
equatorial  plane  and  x  points  to  the  Greenwich  meridian. 
Right  ascension  and  declination  of  station 
Cartesian  coordinates  of  station  's  position  where  x  and  y 
are  in  the  eouatorial  plane  and  x  points  to  the  vernal  equinox. 
Cartesian  coordinates  of  the  point  or  satellite  where  x  and  y 
are  in  the  equatorial  plane  and  x  points  to  the  vernal  equinox. 


In  addition  to  the  above  the  short  and  long  forms  of  output  list  the 
look-angle  information: 

a)  Time  of  crossing  -  day,  hour  and  minutes  of  Zebra  time. 

b)  Elevation  and  azimuth  angles 

c)  Slant  range  in  kilometers 


The  sentinels  required  by  the  TELTYP  program  will  be  supplied 
to  enable  transmission  of  the  short  form,  or  look-angle  section,  of 
the  output. 
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10.5  Processing 

The  first  request  card,  observation  card  and  one  station 
card  are  read  at  the  start  of  the  program.  The  x,  y,  and  z 
coordinates  of  the  station  and  the  object  are  then  calculated. 

These  values  are  written  on  the  output  tape  if  a  long  form  of  out¬ 
put  is  requested. 

The  assumption  made  is  that  the  object  will  appear  in  the  same 
place  one  revolution  later.  Therefore,  the  look-angle,  or  search 
ephemeris  quantities  are  calculated  for  the  time  t,  which  is  equal 
to  the  observation  time  plus  the  smallest  orbital  period  expected. 

If  the  point  is  visible  at  the  station  the  quantities  are  written  out  on 
tape. 

The  orbital  time  is  then  updated  by  the  time  increment  and 
compared  to  the  largest  orbital  time  expected.  If  this  period  is 
within  the  limits,  the  search  ephemeris  is  computed  for  this  new 
time.  The  process  continues  until  the  time  limits  have  been  ex¬ 
ceeded. 

After  the  search  ephemeris  has  been  computed  for  the  largest 
orbital  period  expected  the  next  station  card  is  read  into  core.  If 
the  station  number  is  greater  than  zero,  the  look-angles  for  this  same 
object  are  computed  for  this  new  station.  A  negative  station  number 
indicates  that  a  new  request  deck  is  to  be  read  into  core  and  the 
processing  initiated  for  another  point  in  space.  A  blank  or  zero  ^ 
station  number  terminates  all  processing  and  the  program  returns 
to  the  executive  program. 

10.  5.  1  Error  Messages 

1.  THE  SLANT  RANGE  IS  MISSING. 

The  program  exits  to  the  executive  routine. 

2.  SUBROUTINE  ERROR  EXIT  FROM  OCTAL _ . 

Subroutine  or  irrecoverable  input- output  error. 

Exits  to  executive  program  if  the  GO  option  is  taken. 

The  message  is  retyped  if  the  STOP  option  is  specified. 

A  dump  should  be  taken  if  possible. 
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10.  6  Formulation 

a)  Initialization 

1.  0G  =  0O  +.  98564724  •  tD+  360.  98565°  •  tFR 

2*  9s  =  eG  +  ^  E 


3. 

*g+  =  • 

99329985  ‘  tg  <j> 

4.. 

6  =  R  • 

cos  i  •  COS  4/ 

5. 

If 

sin  i  •  cos  4/ 

6. 

i  =  R- 

; 

sin  4> 

7. 

p  =  90 

-  ho 

8. 

sin  6  =  cos  p 

•  sin  4>  +  sin  p  *  cos  <J> 

9. 

sin  S  =  -  sin  (3  *  sin  Az/ cos  6 

10. 

a  =  0S 

-  S 

11. 

Ax  =  p 

•  cos  a  •  cos  6 

12. 

Ay  =  p 

•  sin  a  •  cos  6 

13. 

Az  =  p 

•  sin  6 

14. 

x  =  t  • 

cos  0q  -  r|  •  sin  0q 

15. 

Kj 

II 

sin0Q  +  r)  cos  0q 

16. 

Z  =  £ 

17. 

x  =  X  + 

Ax 

18. 

y  =  Y  + 

19. 

z  =  Z  + 

L  z 
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b)  Computation  of  look-angle 

zo. 

*  =  tobs  +  tstart 

21. 

eG  =  eo  +  C3  ‘  td  +  C2  •  tfr 

22. 

0g  =  9q  +  X  jr; 

23. 

X  =  £  ‘  cos  0q  -  r|  sin  0q 

24. 

Y  =  £,  •  sin  Qq  +  ti  cos  0 q  (Note  that  Z 

is  a  constant) 

25. 

Ax  =  x  -  X 

26. 

Ay  =  y  -  Y  (Note  that  A  z  is  a  constant) 

27. 

p  =  si  Ax^  +  Ay^  +  Az^ 

28. 

sin  6  -  Az/ p 

29. 

cos  6  =  v  1  -  sin^  6 

30. 

cos  a  =  Ax/p  cos  6 

31. 

S  =  0S  -  a,  0  <  S  <  360 

32. 

cos  p  =  sinc{>  •  sin  6  +  cos  <f>  •  cos  6  •  cos 

S 

33. 

sin  Az  =  (-cos  6  *  sinS  )/ sin  p 

34. 

cos  Az  =  (sin  6*  cos  <j>  -  cos  6  *  sin<(>cosS)/sinp 

35. 

h  =  90°  -  p 

36. 

< 

+ 

4-> 

II 

37. 

I£  t  <  tstop;  Go  to  21 
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Glos  sary 

C 

Location 

Symbol 

Meaning 

AAi 

First  digit  (may  be  overpunched)  of 
satellite  no.  from  observation  curd 

AZ 

Az 

Azimuth  angle 

AZD 

Azimuth  of  computed  point  in  degrees 

AZX 

Azimuth  of  original  observation  in  degrees 

Ci 

ci 

.  99329985  conversion  coefficient  used 

to  compute 

Cl 

c. 

360.  98565  rotation  rate  of  the  earth 

2 

in  degrees/ solar  day 

C3 

C* 

.  98564724  rotation  rate  of  the  earth 

3 

in  (deg/solar  day)  -360° 

C4 

C4 

1440  minutes /day 

CAPR 

R 

Radius  of  the  earth  at  the  station 

CAPX 

X 

x  coordinate  of  station 

x,  y  in  equatorial  plane; 

CAPY 

Y 

y  coordinate  of  station 

x  points  toward  thq^R' 
vernal  equinox 

CAPZ 

Z 

1 

z  coordinate  of  station 

COSDEC 

cos  6 

Cosine  of  declination 

COSLAT 

cos  4> 

Cosine  of  station  latitude 

COSZD 

cos  (3 

Cosine  of  zenith  angle 

C2PI 

2  7T 

6.  2831853072 

DA 

Day  of  observation 

DECL 

6 

Declination 

DELT 

At 

Time  increment 

DELX 

Ax 

x  coordinate  -  increment  from  station  to 

satellite 

DELY 

y  coordinate  -  increment  from  station  to 

satellite 

DELZ 

A  z 

z  coordinate  -  increment  from  station  to 

satellite 

EARTH R 

6378.  174  km/  e.  r. 

ELEV 

h 

o 

Elevation  angle  of  observation 

ELEVD 

h 

Elevation  angle  of  computed  point  ^ 

ETA 

Tl 

y  coordinate  of  station  (x,  y  in  equatorial®^ 

'1 
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IOUR 

Hour  at  which  point  is  computed 

IRANGE 

Slant  range  for  output  point 

IYR 

Last  digit  of  year  of  observation 

IDAY 

Day  at  which  point  is  computed 

KSTA 

Station  number 

MO 

Month  of  observation 

PI 

7T 

3.  1415926536 

RA 

a 

Right  ascension  of  satellite 

RANGE 

P 

Slant  range  of  computed  point 

RHO 

degrees/radian  =  57. 29578 

S 

S 

Hour  angle 

SINAZ 

Sin  Az 

Sine  of  azimuth  angle 

SINDEC 

Sin  6 

Sine  of  declination 

SINLAT 

Sin  <(> 

Sine  of  station  latitude 

SINZD 

sinP 

Sine  of  zenith  angle 

SN1,  SN2 

SN3,  SN4 

Station  name 

STALAT 

4> 

Station  latitude 

STALATC 

+ 

Geocentric  latitude  of  station 

S TALON 

Station  longitude  in  degrees 

STH 

Station  height 

STLORA 

XE 

Station  longitude  in  radians 

T 

t 

Time  at  which  ephemeris  is  computed 

TD 

tD 

Day  of  year  of  observation 

T  DAYS 

*d 

Integer  part  of  t 

TFR 

*fr 

F ractional  part  of  t 

TH 

Hour  of  observation 

THE  TAO 

eo 

Greenwich  Sidereal  time  at  the  beginning 
of  year 

THETAS 

Siderial  time  at  station 

THETAG 

®G 

Greenwich  sidereal  time 

THETAG1 

Siderial  time  at  Greenwich  in  degrees 

TM 

Minute  of  observation 

TMIN 

Minute  at  which  point  is  computed 

TOBFR 

4fr 

Time  of  observation  in  fractional  part 

of  day 


1-10-7 


POSE 


Wolf  Research  and  Development  Corporation 


TOBS 

*obs 

Day  of  year  of  observation 

TS 

Seconds  of  observation 

TSTART 

*start 

Minimum  period 

TSTOP 

^stop 

Maximum  period 

X 

X 

x  coordinate  of  satellite 

XAT 

Last  2  digits  of  satellite  number  from 
observation  card 

XI 

t 

x  coordinate  of  station  (x,  y  in  equatorial  plane; 

x  points  to  Greenwich 
meridian) 

Y 

y 

y  coordinate  of  satellite 

YEAR 

Year  of  observation 

YR 

Last  digit  of  year  of  observation 

Z 

z 

z  coordinate  of  satellite 

ZENDIS 

p 

Zenith  angle 

ZETA 

l 

z  coordinate  of  station (x,  y  in  equatorial plar* 

x  points  to  Greenwich^ 
meridian) 
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11. 1  ORPS,  Orbital  Plane  Search 

11.  2  Function 

ORPS  is  used  for  predicting  search  times  for  observing 
satellites  at  a  given  observing  station.  Limitations  of  the  observ¬ 
ing  station,  imposed  by  the  type  of  equipment  used,  are  considered. 
For  example,  the  results  must  meet  the  criteria  for  maximum  slant 
range,  minimum  elevation  angle,  and  visibility. 

The  program  computes  the  XYZ  search  point  coordinates  of  a 
satellite  from  which  its  position  may  be  defined  in  terms  of  right 
ascension,  declination,  azimuth,  elevation,  and  slant  range.  The 
elevation  and  illumination  angles  of  the  sun  are  also  computed  at  the 
search  point  or  prediction  time. 

1 1.  3  Input 

A  set  of  input  consists  of  a  standard  six  or  seven  card  element 
set,  a  standard  station  card  for  the  observing  station,  and  a  request 
card.  The  set  may  be  repeated  as  often  as  desired,  but  the  last  set 
must  be  followed  by  a  blank  card  to  terminate  the  program. 

The  format  of  the  request  card  is  as  follows: 

1)  columns  1-10  contain  the  requested  start  time,  in  day  of  year,  for 
predictional  data  for  a  given  observing  station  and  satellite;  2)  col¬ 
umns  11-20  contain  the  time  increment  in  minutes  between  search 
points;  3)  columns  21-30  contain  the  stop  time  in  day  of  year;  4)  the 
search  azimuth  angle  in  degrees  of  the  station  is  contained  in  columns 
31-40;  5)  columns  41-47  contain  the  maximum  slant  range  in  kilometers 
acceptable  to  the  observing  station;  6)  columns  48-57  contain  the  mini¬ 
mum  elevation  angle  in  degrees  acceptable  to  the  observing  station; 

7)  if  only  visible  passes  are  desired,  a  one  (1)  is  punched  in  column  58. 

Quantities  specified  in  the  above  paragraph  depend  upon  the 
limitations  of  the  equipment  type  used  by  the  observing  station. 
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ORPS  may  be  used  with  the  TELTYP  program  if  teletype 
transmission  of  the  output  is  desired.  Therefore,  all  TELTYP 
control  functions  are  included  with  the  output. 

The  first  line  is  the  heading  "ORBITAL  PLANE  SEARCH  AND 
XYZ  LOOK  ANGLE  PROGRAM".  The  next  line  is  the  satellite  and 
element  numbers  of  the  satellite  for  which  the  predictions  were  re¬ 
quested.  The  next  line  is  the  comment  "ORBITAL  ELEMENTS". 

This  indicates  that  the  nodal  elements  used  in  the  computations  appear 
in  the  next  three  rows,  five  columns  to  a  row.  The  elements  that 
are  printed  out  by  row  are  the  day  of  year  of  epoch,,  fractional  day  of 
epoch,  nodal  period  at  epoch,  rate  of  change  of  period  in  days/  rev^ 
at  epoch,  rate  of  change  of  c  in  days/rev  ,  first  and  second  derivatives 
of  the  nodal  period,  the  right  ascension  of  the  ascending  node  at  epoch, 
first  and  half  second  derivatives  of  the  right  ascension,  the  argument 
of  perigee  at  epoch,  first  and  half  second  derivatives  of  the  ^ 

argument  of  perigee,  eccentricity,  and  the  inclination. 

The  next  three  lines  consist  of  the  parameters  specified  on  the  para¬ 
meter  input  card.  The  start  time  in  days  of  year,  the  time  increment 
in  minutes,  and  the  stop  time  in  days  of  year  are  printed.  The  search 
azimuth  of  the  station  in  degrees  and  the  criteria  for  maximum  slant 
range  in  kilometers  and  minimum  elevation  angle  in  degrees  are  printed. 

The  year  constants  are  printed  including  the  sideral  time  at  the 
start  of  the  year,  the  longitude  of  the  sun,and  the  difference  between 
the  longitude  of  the  sun,  and  the  argument  of  perigee  of  the  sun. 

The  next  line  is  a  heading  line,  and  the  station  name,  latitude, 
longitude,  and  height  appear  directly  below.  The  satellite  and  element 
numbers  are  printed  next. 

The  main  output  of  the  program  consisting  of  the  time  of  search 
point,  predicted  position,  and  visibility  quantities  is  preceded  by 
two  heading  lines.  The  output  appears  in  order  of  increasing  time  of 
search  point  in  increments  specified  bv  the  parameter  input  card. 
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Each  data  line  includes  the  year,  month, day,  hour,  and  minute  of 
the  search  point,  right  ascension,  declination,  azimuth,  elevation, 
and  slant  range  of  the  satellite,  and  the  elevation  and  illumination 
angles  of  the  sun.  Unless  the  specified  criteria  for  maximum  slant 
range,  minimum  elevation  angle,  and  visibility  are  met,  no  output 
for  the  time  of  search  point  will  apppear. 

11.4.1  Comments  with  Output 

1.  PROGRAM  ASSUMES  PN  =  PA  FOR  SATELLITE  NO.  XXX. 

This  comment  indicates  that  the  nodal  period  at  epoch  in  days  is 
missing  from  the  sixth  card  of  a  seven  card  element  set.  The 
anomalistic  period  is  used  in  its  place. 

2.  ELEMENT  CARDS  ARE  OUT  OF  ORDER  FOR  SAT  NO  XXXX 
ELEM  NO  XXXX.  This  comment  indicates  that  a  card  was  out  of 
order  or  missing  in  an  element  set.  The  program  returns  to  read 
another  element  set.  SATELLITE  XXX  CARD  XXX  OUT  OF  ORDER 
appears  simultaneously  on  the  Flexowriter. 

11.5  Processing 

ORPS  predicts  the  right  ascension,  declination,  azimuth  and 
elevation  angles  for  a  given  satellite  and  the  elevation  and  illumina¬ 
tion  angles  of  the  sun,  in  a  specified  time  range,  for  a  given  station. 

The  limitations  of  the  observing  station  are  considered.  The  program 
consists  of  two  sections,  the  Orbital  Plane  Search  section  and  the  XYZ 
Look  Angle  section. 

The  Orbital  Plane  Search  section  computes  the  xyz  point  co¬ 
ordinates  from  the  satellite  elements  and-station  coordinates.  The 
geocentric  latitude  of  the  station,  difference  in  longitude  from  station 
to  search  point,  longitude  at  the  search  point,  radius  of  earth  at  station, 
and  the  x,  y,  z  coordinates  of  the  station  in  a  rotating  system  are 
computed.  The  time  of  search  point  is  converted  from  day  of  year  to 
month,  day,  hour,  and  minute.  The  sidereal  time  at  Greenwich  at  the 
search  point  time,  sidereal  time  at  the  search  point,  right  ascension 
of  ascending  node  at  search  point,  argument  of  latitude  of  satellite  in 
the  orbit  plane,  the  argument  of  perigee  at  the  prediction  time,  the 
true  anaomaly,  semi- major  axis  at  epoch,  anomalistic  period  at  the 
prediction  time,  semi-major  axis  at  the  predicted  time,  eccentricity 
at  the  prediction  time,  and  the  distance  of  the  satellite  from  the  center 
of  the  earth  are  computed.  Then  the  x,  y,  z  search  point  coordinates 
are  found. 
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The  XYZ  Look  Angle  section  defines  the  position  of  the  satellite 
in  terms  of  right  ascension,  declination,  azimuth,  elevation  angle, 
and  slant  range  from  the  x,  y,  z  search  point  coordinates.  The  x,  y,  z 
coordinates  of  the  station  in  a  fixed  system  are  found  to  compute  the 
slant  range.  If  the  predicted  slant  range  is  greater  than  the  maximum 
specified  slant  range,  the  program  increments  the  time  of  search 
point  and  returns  to  the  Orbital  Plane  Search  section  to  compute  the 
x,  y,  z  search  point  coordinates  for  the  incremented  time.  Other¬ 
wise,  the  right  ascension  of  the  satellite,  declination  of  the  satellite, 
sidereal  time  at  the  station,  hour  angle  of  the  satellite,  zenith  angle, 
and  elevation  angle  are  computed  for  the  search  point  or  prediction 
time.  If  the  specified  minimum  elevation  angle  is  greater  than  the 
predicted  elevation,  the  program  increments  the  time  of  search  point 
and  returns  to  the  Orbital  Plane  Search  section.  Otherwise,  the 
azimuth  is  computed. 

The  program  determines  if  the  satellite  will  be  visible  at  search 
point  time  by  computing  the  longitude  of  the  sun  at  the  prediction  time, 
right  a  scension,  declination,  and  elevation  of  the  sun,  and  the  angle 
T)  (see  illustration).  If  only  visible  passes  are  required,  the  program 
tests  the  elevation  and  illumination  angles  of  the  sun.  If  the  former 
is  less  than  -4  degrees  and  the  latter  is  greater  than  -4  degrees  than 
the  pass  will  be  visible.  If  not,  the  program  increments  the  time  and 
returns  to  the  Orbital  Plane  Search  section. 

Output  quantities  at  each  search  point  time  include  the  time, 
right  ascension,  declination,  azimuth,  elevation,  and  slant  range  of 
the  satellite,  and  the  elevation  and  illumination  angle  of  the  sun.  The 
program  then  increments  the  time  of  search  point,  and  returns  to  the 
Orbital  Plane  Search  section  unless  the  stop  time  has  been  exceeded. 
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11.  6.  1  Formulation  -  Orbital  Plane  Search  Section 


1. 

<j>  =  tan"1  (.  99329985  tan  <J>) 

2. 

iSp  =  cos  1  (sin  Az  cos  <f>  ) 

0 

< 

QQ 

V 

A 

i — 1 

00 

o 

0 

3. 

A\  =  cos  *  (cos  Az/sin  igp) 

0 

< 

AX  <  360° 

4. 

X  sp  =  X  -  AX 

0 

< 

X  sn<  360° 

sp 

5*  R  =  6378. 145  (.  998320047  +  .  001683494  cos  2<j>  000003549  cos  4<j> 

+  .  000000008  cos  6<f>)  +  H/  1000 

6.  xstat  =  cos  X  cos  4> 

Ystat  =  R  sin  X  cos  4/ 
zstat  =  RsinV 


7.  S  tc  -  ta 


8. 

II 

o 

CD 

0o+  • 

98564735  td  +  360.985647  tf 

0  <  0G  <  360° 

9. 

“sp  - 

©G  + 

X 

sp  0l«sp<  360° 

10. 

ft^  = 

<*c 

-  Tq)  +  4*  °  (tc  -  To)2 

o  <  nt  <  360° 

11. 

Af2  = 

^sp 

0<  <  360° 

If  |AO 

|  >10" 

31 

go  to  14. 

If  |  AU  -  180°  |  <go  to  14. 

12.  cos  y  =  cos  i  cos  iSp  +  sin  i  sin  igp  cos  Aft 
Find  proper  quadrant  of  y 

13.  sin  |jl  =  (sin  Aft  sin  igp)/sinY 
Go  to  15. 

14.  sinp<  =  sin  <(>/  sin  i 
Go  to  16. 
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15. 

M-  = 

tan  *  (sin  Aft/cos  All  cos  i 

-  sin  i/tan;  igp 

) 

COS  p 

=  sin  p/tan  fJi  Go  to  17. 

16. 

ast  ' 

=  0G  +  X 

cos  p 

=  COS  (  Qg|.  -  £2^.)  COS  4> 

M*  = 

tan  *  ( sin  p/cos  p 

17. 

If  COi 

3  p  is  negative  pQ  =  p  +  n  , 

otherwise  pQ  = 

:  f 

^(0 

18. 

wt  = 

w  w  (tc  -  TQ)  +  “y-  w  (tc 

:  -  To>2  0  5  wt 

< 

360° 

19. 

V  = 

4-» 

3 

1 

O 

=L 

0<  V 

< 

360° 

20. 

ao  = 

(P J.  058672947)2//3 

21. 

pat 

=  Pa  +  P  <*C-T0)+  J-  P 

(tc-T0)2 

22. 

at  = 

/  2/3 

(Pat/.  058672947) 

23. 

et  = 

1  -  (a0/at)  (  1-e  ) 

24. 

r  = 

at  (I)-  +  et  wsV ) 

25. 

x  = 

6378.  145  r  (  cos  pQ  cos  ft  t 

-  sin  p^  sin 

CO 

s  i) 

y  = 

6378.  145  r  (cos  p^  sin  * 

f  sin  p^  cos  £2  t 

CO 

s  i) 

z  ~ 

6378.  145  r  (sin  pn  sin  i) 

11.  6.2  Formulation  ~  XYZ  Look  Angle  Section 


26. 


27. 


*  = 

y  = 

z  - 

p  = 
if  p  > 


xstat  cos  6g  "  ystat  sln  0G 
xstat  sin  0G  +  y stat  cos  0G 
zstat 

[  (  x  -  S)2  +  y  -  y2  +  (z  -  z)2]  1/2 
P  max*  g°  to  47. 


,  360) 


1-11-6 


Wolf  Rasaarch  and  Davalopmant  Corporation 


ORPS 


28.  cosa  =  (x  -  x)/[  (x  -  x  )^  4-  (y  -  y  )^  j1^ 
a  =  tan"1  [  (y  -  y  )/(x  -  x)  ] 

29.  If  cos  a  negative  a  =  a  +  II  ,  otherwise  a  =  [  a]  ^  3^0) 

30.  sin  6  =  (z  -  z)/[  (x  -  x)^  +  (y  -  y)^  +  (z  -  z^]1^ 


31. 

32. 

33. 

34. 

35. 


0st  =  0g  +  ^ 

HAs  =  0st  -  a  0  <  HAg  <  360° 

Zp  =  cos  1  (  sin 4>  sin6  +  cos<()  cos  6  cos  HAg) 


If  h 


min 


>  hf 


go  to  47. 


sin  Az  =  (cos  6  sin  HAg)/sin  (3 

cos  Az  =  (-sin6  costj)  4  cos  6  sintj>  cos  HAg)/ sin  z^ 

Az  =  tan  1  (sin  Az/cos  Az) 

If  cos  Az  negative,  Az  =  Az  4*  n  0  <  Az  <  360° 


36. 

<0  <*> 

=  LQ  +  .  98564735  t&  +  1.  91665  sin  (.  98564735  ta 

37. 

P 

© 

II 

iQ(t)  -2.  46682  sin  (2iQ(t)) 

38. 

6©  = 

tan  1  (.  4336608  sin  o.q) 

39. 

0  (t)  = 

oG+ 

40. 

If 

© 

_  1 

sin  A  [  si n<}>  sin  6q  4-  cos  <|>  cos  6q  cos  (9(t)  -  a^)] 

41. 

Qgc  = 

tan'1  (y/x)  0  <  agc  <  360° 

42. 

SDgc 

=  sin  1  (z/6378. 145  r) 

£  =  cos  1  (  cos  SDgC  cos  6q  cos  (a^  -  QgC)  -  sin  SD^c  sin  Sq) 

43.  T|  =  sin  1  (l/  r) 

If  all  passes  desired  go  to  45,  otherwise  test  elevation  of  sun 
(Iiq).  If  h0>  -4  degrees,  pass  not  visible,  go  to  47. 
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44.  I  =  £  -  tj 

Test  illumination  angle  of  sun  (I).  If  I<  -4  degrees,  pass  not 
visible,  go  to  47.  If  I  >  4  degrees  go  to  46. 

45.  I  =  £  -  T) 

46.  Output  time,  a,  6,  Az,h,  p  ,  h^,  I. 

Increment  time: 


t  =  t  +  A  t 
c  c 

If  t  <  t  return  to  8,  Orbital  Plane  Search  Section.  Otherwise 
c  e 

return  to  start  of  program  to  process  next  set. 
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11.  7  Glossary 


Location 

Symbol 

Meaning 

A 

a 

Semi-major  axis 

c  o 

Start  time  minus  epoch  time 

AA 

xstat 

x  coordinate  of  station  in  rotating  system 

ALST 

ast 

Sidereal  time  at  the  station 

AO 

ao 

Semi-major  axis  at  epoch 

AT 

at 

Semi-majoY'axis  at  prediction  time 

AZ 

Az 

Search  azimuth  angle 

BB 

Ystat 

y  coordinate  of  station  in  rotating  system 

C 

C 

Rate  of  change  of  period  at  epoch  in  days /rev 

C2PI 

2  t r 

Constant,  6.28318530 

C14 

c14 

Difference  between  longitude  of  sun  and  argu¬ 
ment  of  perigee  of  sun 

CAL 

Month  of  computed  point 

CAPR 

R 

Radius  of  earth  at  station 

CAZ 

cos  Az 

Cosine  of  astronomical  azimuth  of  object 

CC 

zstat 

z  coordinate  of  station  in  rotating  system 

CDL 

cos  AX 

Cosine  of  delta  longitude 

CMUO 

COS  fX 

Cosine  of  jjl 

CRA 

cos  a 

Cosine  of  right  ascension 

CRAGC 

CXI 

cos  a 

gc 

cos  £ 

Cosine  of  a,gC 

Cosine  of  £ 

CZD 

p 

Cosine  of  zenith  angle 

D 

d 

2 

Rate  of  change  of  c  in  days/rev 

E 

e 

Eccentricity 

ELEVA 

h 

Elevation  angle 

ET 

et 

Eccentricity  at  prediction  time 

ETA 

See  illustration 

FNIOM 

-31 

Constant  10 

GI 

i 

Inclination 

HITE 

H 

Height  of  station 

HMIN 

hMIN 

Minimum  elevation  angle  in  degrees 

HSUNJ 

h© 

Elevation  of  sun 
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ID 

Element  card  number 

IDAY 

Day  of  month  of  computed  point  "" 

IDCI 

Input  tape 

IDCO 

Output  tape 

IELNO 

Element  number 

IHR 

Hour  of  computed  point 

IMIN 

Minute  of  computed  point 

ISATNO 

Satellite  number 

IYR 

Year  of  computed  point 

MP 

Satellite  number  for  Flexo  error  message 

NIX 

Switch  set  to  1  if  element  card  out  of  order 

NOE 

E  to  check  against  column  80  for  7  card  set 

OMEGT 

wt 

Argument  of  perigee  at  prediction  time 

OMGAT 

Right  ascension  of  ascending  node  at  search 
time 

OMGSP 

OX 

0 

sp 

*©(*) 

Sidereal  time  at  the  search  point 

Longitude  of  the  sun  at  prediction  time 

PA 

Pa 

W 

Anomalistic  period  at  epoch 

PDDOT 

P 

Second  derivative  of  nodal  period  (days/rev.  ) 

PDOT 

P 

First  derivative  of  nodal  period  (days/rev. 

PHI 

Latitude  of  station 

PHIP 

V 

Geocentric  latitude  of  the  station 

PI 

TT 

Constant,  3*  14159265 

PMAX 

P  MAX 

Maximum  slant  range  in  km. 

PN 

P 

n 

Nodal  period  at  epoch 

PT 

Pat 

Anomalistic  period  at  prediction  time 

R 

Constant,  km/earth  radius 

RA 

0 

Right  ascension  of  ascending  node  at  epoch 

RAD 

Constant,  degrees/radian 

RADDOT 

i/2  n 

i/2  second  derivative  of  ft  in  deg/day^ 

RADOT 

h 

First  derivative  of  ft  in  deg/ day 

RAV 

r 

Distance  of  satellite  from  center  of  the'' 

earth 

S 

SAZ 

HA 

8 

sin  Az 

Hour  angle  of  satellite 

Sine  of  astronomical  azimuth  of  object 

SD 

t , 
ds 

Smithsonian  days  at  time  of  computed  point 
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SDEC 

sin  6 

Sine  of  declination 

SETA 

sin  r| 

Sine  of  angle  rj 

SHSUNJ 

sin  h@ 

Sine  of  elevation  of  sun 

SLRANG 

P 

Slant  range 

SMUO 

sin  |i 

Sine  of  argument  of  latitude  of  the  satellite 

STEP 

At 

Time  increment  in  minutes 

STNMl,  STNM2 

Alphanume  ric 

station  name 

STNM3.STNM4 

TA 

ta 

Start  time  (day  of  year) 

t 

c 

Time  of  computed  point 

TANMU 

tan  [l 

Tangent  of  angle  \i 

TD 

td 

Prediction  time  in  days 

TDECS 

tan  6q 

Tangent  of  declination  of  sun 

TE 

te 

Stop  time  (day  of  year) 

TF 

tf 

Prediction  time  (fraction  of  day). 

THETG 

®  G 

Sidereal  time  at  Greenwich  at  prediction 
time  in  degrees 

THETO 

eo 

Sidereal  time  of  Greenwich  at  start  of  year 

THETST 

0st 

Sidereal  time  at  station 

THTGT 

e(t) 

Sidereal  time  of  Greenwich  at  time  t 

TO 

To 

Day  of  year  of  epoch 

TOD 

Integral  day  of  year  of  epoch 

TOF 

Fractional  day  of  epoch 

TPHIP 

tan  cj/ 

Tangent  of  geocentric  latitude  of  station 

TRA 

tana 

Tangent  of  right  ascension  of  predicted 
sighting 

V 

V 

True  anomaly 

W 

0) 

Argument  of  perigee  at  epoch 

WDDOT 

1/2  to 

l/2  second  derivative  of  00  in  deg/day 

WDOT 

CO 

First  derivative  of  w  in  deg/day 

X 

X 

x  coordinate  of  station  in  fixed  system 

XAZ 

Az 

Azimuth  of  object. 

XBAR 

X 

x  coordinate  of  station  in  fixed  system 

XCDL 

A  X 

Difference  in  longitude  from  station  to 
search  point. 
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XCGAM 

V 

Intermediate  quantity  used  in  computation 
of  SMUO  ' 

XDECS 

6© 

Declination  of  sun 

XI 

e 

Angle  £  intermediate 

XIA 

i 

Illumination  angle 

XISP 

isp 

Intermediate  quantity  used  in  computing  CDL 

XL 

X 

Longitude  of  station 

XLSUN 

L0 

Celestial  longitude  of  sun  at  beginning  of 
year 

XRASUN 

a© 

Right  ascension  of  sun 

XTHETG 

eG 

Sidereal  time  at  Greenwich  at  prediction 
time  in  radians 

XZD 

P 

Zenith  angle 

Y 

y 

y  coordinate  of  satellite 

YBAR 

7 

y  coordinate  of  station  in  fixed  system 

YLSP 

YR 

Xsp 

Longitude  at  the  search  point 

Year  of  epoch 

Z 

q 

z  coordinate  of  satellite 

ZBAR 

z 

z  coordinate  of  station  in  fixed  system 

ZDE’C 

6 

Declination  of  satellite 

ZMUO 

V-  o 

Argument  of  latitude  of  satellite  in  orbit  plane 

ZOMG 

AQ 

n  -  a 

sp  t 

ZRA 

a 

Right  ascension  of  satellite 

ZRAGC 

agc 

Right  ascension  of  satellite 
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KEY: 

© 


Continue  xyz  Look  Angle 
Computations 


Compute  Smithsonian  Day 


Obtain  Year  Constants 


Convert  Smithsonian  Day 
to  Gregorian  Date 
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Increment  Time 
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12.  1  ASUM,  Observation  Acquistion  File  Summary 

12.  2  Function 

This  program  will  provide  a  complete  listing  of  the  current 
Observation  Acquistion  File. 

12.  3  Input 

The  input  is  comprised  entirely  of  the  information  written 
on  the  A- File  of  the  SEAI  tape. 

12.  4  Output 

The  output  consists  of  the  sensor  information  required  to 
obtain  look  angles  for  a  given  satellite.  The  output  is  sequential 
according  to  satellite  number  and  includes  the  following: 

Satellite  number 
Sensor  number 
Sensor  name 
Pass  code  (all  or  visual) 

Format  request  (short  or  complete) 

Type  (all,  3-point,  Baker-Nunn.  ) 

Minimum  azimuth 
Maximum  azimuth 
Minimum  elevation 
Maximum  elevation 
Maximum  range 
Grid,  or  step,  size  in  minutes 

12.  5  Processing 

The  program  reads  the  Sensor  File  to  obtain  the  required 
sensor  information.  The  Acquisition  File  is  then  located  and  de¬ 
coded.  Sensor  information  is  retrieved  from  the  sensor  storage 
area  when  the  need  arises.  If  the  information  is  not  available 
the  following  message  is  printed: 

NOT  IN  FILE 
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The  data  is  written  onto  the  output  tape  under  control 
of  counters  which  allow  fifty  lines  of  output  per  page.  Output 
is  single  spaced.  It  is  in  satellite  number  order  and  in  the 
sensor  number  order  called  for  by  the  Acquisition  File.  A 
double  space  separates  the  satellites. 

12.5.1  Error  Messages 

When  tape  reading  difficulties  occur  the  following  message 
will  appear  on  the  flexo: 


TAPE  TROUBLE 

TYPE  GO  TO  RETRY  JOB.  TYPE  STOP  TO  TERMINATE. 
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SEAI  TAPE 


ID  Block 
(Tape  ID) 

SATTB  Block  Plus 

16  Primary  Sensors 

Restart  Block 

Sensor  File 

A  -^Block 

Element  File 

B-Block 

Observation 
Acquisition  File 

C-Block 

Information  File 

O-Block 

ORSUM  FILE 

Z-0lock 

X 

X 

0  0 

A 

BBB 

c 

P 

F  T 

Y 

NNN 

hMIN 

h  MAX 

Amin 

Amax 

p  MAX 

AT 

BAKER  -  NUNN  CONTROL 

XX  «  FILE  MAINTENANCE 
BBB  *  SATELLITE  NUMBER  (BCD) 
C«  C  TYPE 

/0*ALL  \ 
P*  PASS  CODE  ) 

\  I »VISUAL/ 


F:  FORMAT 


6  SHORT 


(°sS 

V  I  *  COMPLETE/ 


Y  *  TTY  INHIBIT 
NNN  *  SENSOR  NUMBER  (  BCD) 

T  *TYPE 

O i ALL  POINTS 

3  2  FI  RST,  LAST, 

CLOSEST  POINT 
OF  APPROACH 

4  *  BAKER- NUNN 
6  •  ALL  POINTS 

SCHEDULING 
9«  FIRST,  LAST, 
CLOSEST  POINTS 
OF  APPROACH 
SCHEDULING 
AMIN,  AMAXj  hMIN.hMAX  ARE 
SENSOR  ACQUISITION  LIMITS 
yPMAX  i MAX IMUM  SLANT  RANGE  OF 
SENSOR  FOR  THIS  SATELLITE 
BAKER-NUNN  CONTROL  IS  FOR 
BN  LOOK  ANGLE  PROGRAM 
At  IS  LA  GRID  SIZE 
Y.P,  F,T  ARE  PARAMETERS  FOR 
l  LOOK  ANGLE  PROGRAM 


Fig. 12.  1 
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Tape  Identification-Block  Check  Sub  Routine 
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13.  1  SSUM,  Sensor  File  Summary 

13.2  Function 

This  program  prepares  a  complete  listing  of  the  Sensor 

File. 

13.3  Input 

The  input  is  comprised  entirely  of  the  Sensor  File  W-iuen 
on  the  SEAI  tape. 

13.4  Output 

A  listing  of  the  sensor  data  contained  in  the  S-File  is  provided. 
The  following  information  is  included  as  part  of  the  output: 

Sensor  number 
Sensor  name 
Latitude  in  degrees 
Longitude  in  degrees 
Height  in  earth  radii 

X/cos  0  or  —  ( C  +  H)  cos  0  in  earth  radii 

Z  or  —  (S  +  H)  sincj)  in  earth  radii 

Accuracy  digit  for  azimuth,  elevation  and  range 

Classification  code 

Sensor  type 

13.5  Processing 

The  SEAI  tape  Is  read  to  locate  the  Sensor  File.  After 
locating  this  file  the  program  reads  1386  words  into  core  storage. 

If  the  ending  sentinel  is  found  before  the 'buffer  area  is  filled,  the 
program  will  process  as  much  information  as  it  has  been  able  to 
retrieve.  If  more  information  is  still  to  be  read  from  the  Sensor 
File  the  program  returns  for  a  second  pass  after  processing  the 
first  buffer  full  of  data. 

Counters  are  used  to  provide  for  nine  groups  of  five  sensors 
for  each  page  of  printed  output.  Headings  and  a  page  count  are 
written  on  the  top  of  each  page*  The  order  of  the  S-File  determines 
the  order  of  the  printout. 
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A  2 


Processes  Information  Contained  in  S-File 
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14.  1  ISUM,  Information  File  Summary 

14.  2  F unction 

The  program  generates  a  listing  of  all  or  specified 

sections  of  the  Information  File  of  the  SEAI  tape.  A  ’’box 
score"  or  tally  of  the  number  of  satellites  still  orbiting  can 
be  obtained. 

1 4.  3  Input 

The  input  consists  primarily  of  the  I-File  of  the  SEAI  tape. 
Control  cards  included  in  the  Job  deck  contain  the  information  re¬ 
quired  to  set  up  the  options  available  in  the  program.  The  following 
data  is  punched  in  cols.  1  -  3: 

a)  ALL  -  used  to  obtain  a  complete  listing  of  the  I-File. 

b)  BOX  -  used  to  obtain  a  tally  of  the  number  of  satellites 

orbiting. 

c)  NNN  -  a  three  digit  satellite  number  for  each  satellite, required 

if  the  ALL  option  is  not  used. 

d)  END  -  this  signals  the  end  of  the  control  data  and  is  always 

required. 

14,4  Output 

The  I-File  of  the  SEAI  tape  is  written  for  off-line  printing. 
Information  printed  out  includes: 

Satellite  number 
Satellite  name 
Launch  date 
Launch  site 
Booster  country 
Payload  country 
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14.  5  Proces sing 

The  control  information  described  in  the  input  section  is 
read  from  the  system  data  tape  (logical  zero).  If  all  satellites 
are  requested,  the  entire  I- File  is  read  and  prepared  for  output 
purposes.  If  individual  satellites  are  requested,  then  the  I-File 
is  scanned  and  only  the  information  desired  is  written  onto  the 
output  tape.  If  a  box- score  of  the  orbiting  satellites  is  called 
for,  then  this  is  written  out  following  the  printout  of  the  I-File. 

14.  5.  1  Error  Messages 

If  irrecoverable  tape  errors  are  encountered  while  reading 
the  SEAI  tape  the  following  message  is  written  on  the  Flexo; 

PROGRAM  TERMINATED  DUE  TO  POOR  BLOCK 

MARKS,  SPROCKET  ERROR,  SI  OR  SZ  ERROR, 

OR  DISABLED  UNIT  ON  LOGICAL  4. 

A  parity  error  will  cause  a  single  reread  and  a  second  failure  will 
result  in  the  program  issuing  a  minus  one  read  order  with  the  follow 
ing  comment: 

MINUS  ONE  READ  ORDER  ISSUED  TO  OVERRIDE 

PARITY  ERROR 
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S  E A I  TAPE 


j 

r, 

SATELLITE  NUMBER  (  X . 

,  ,CNNN  ) 

ID  Block 

/ 

2 

SATELLITE  NAME 

(  Top*  ID  ) 

/ 

3 

SATTB  Block  Plus 

/ 

4 

COMMON  NAME 

16  Primary  Sensors 

/ 

5 

/ 

6 

LAUNCH  DATE  1 

Restart  Block 

/ 

7 

LAUNCH  SITE 

/ 

8 

/ 

9 

/ 

1  0 

BOOSTER  COUNTRY 

Sensor  File 

/ 

1  1 

PAYLOAD  COUNTRY 

/ 

!  2 

MISSION  OR  DESCRIPTION 

/ 

1  3 

/ 

1  4 

WEIGHT 

A-Block 

/ 

1  5 

SHAPE 

/ 

1  6 

LENGTH 

/ 

1  7 

HEIGHT 

_ 

/ 

1  8 

WIDTH 

Element  File 

/ 

1  9 

DIAMETER 

/ 

20 

MEAN  DRAG  ( 

.D  DO  ) 

/ 

21 

VARIANCE  ( 

.ODD) 

/ 

22 

RADAR  CROSS  SECTION 

B-Block 

/ 

23 

VARIANCE  t 

D.D ) 

/  * 

24 

MEAN  REFLECTION  < 

D.D) 

/  o 

23 

VARIANCE  ( 

D.D) 

/  j 

/  * 

26 

TUMBLING  DATE  ft  RATE 

Observation 

/  t*. 

/  ° 

27 

TUMBLING  MODE 

! 

Acquisition  File 

28 

STABILIZATION 

/  o 

/  * 

29 

/  o 

/  *■ 

30 

UAUrilUCB  r  U  AS  Ar  TTD  ICT  1 

■  J 

C-Block 

/ 

31 

TRANSMITTING  FREQUENCIES  (  .DO) 

/ 

32 

f 

33 

34 

Information  File 

35 

36 

RECEIVING  FREQUENCIES 

37 

V 

38 

D-Bluck 

39 

DECAY  DATE 

N. 

40 

DETERMINED 

\ 

41 

LIFETIME  IN  YEARS  ( 

.ODD)  | 

OR  SUM  FILE 

\ 

42 

HELIOCENTRIC  ELEMENTS  (.DDDDD)  E  | 

43 

( 

.DDDDD)  A 

\ 

44 

( 

.DDDDD)  0| 

\ 

45 

( 

.DDDDD)  Ot 

Z-Block 

46 

< 

.DDDDD)! 

\47 

< 

.DDDD)  P 
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15.1  TELTYP  ,  Magnetic  Output  Tape  to  Teletype 

Tape  Conversion 

15.2  Function 

The  TELTYP  Program  is  used  to  convert  an  output  tape, 
written  by  other  programs,  to  Baudot  code.  The  magnetic  out¬ 
put  tape  used  as  input  to  this  program  must  contain  the  sentinels 
described  in  the  input  section*  These  sentinels  are  used  to  identify 
the  messages  to  be  converted  by  the  TELTYP  program.  The  output 
tape  is  searched  for  the  beginning  sentinels.  Conversion  then  pro¬ 
ceeds  from  BCD  to  Baudot  code  until  an  end  of  message  sentinel  is 
located.  With  the  completion  of  one  message,  succeeding  units  are 
sought,  identified  and  converted. 

After  completely  processing  the  input  tape  the  TELTYP  pro¬ 
gram  writes  the  teletype  code  onto  the  input  tape.  This  new  infor¬ 
mation  follows  the  last  output  previously  written  onto  that  tape.  A 
special  data  select  character  is  used  to  mark  this  output  as  informa¬ 
tion  to  be  punched  from  magnetic  tape  to  5 -level  paper  tape  via  the 
Universal  Buffer  Controller  (UBC). 

15.  3  Input 

Input  to  the  TELTYP  program  is  comprised  entirely  of 
the  output  tape  (logical  1  1)  previously  written  by  any  one  program, 
or  several  programs,  processed  by  the  computer. 

The  TELTYP  program  must  be  called  upon  to  perform  its 
function  immediately  following  the  programs  desiring  this  optional 
output.  The  output  tape  must  not  be  wrapped  up  or  rewound  by  the 
operator  or  system  under  which  the  programs  are  functioning.  If 
the  tape  has  been  rewound, the  teletype  conversion  will  not  be  per¬ 
formed  and  a  message  will  be  written  on  the  Flexo  indicating  the 
status  of  the  input  tape. 

The  following  sentinels  will  be  searched  for  on  the  input 
tape  which  must  be  addressable  as  logical  tape  11  (eleven): 

1.  Data  select  1 

2.  14  B'  s 
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3.  *  $ 

4.  A  block  of  U's. 

15.  3.  1  Description  of  the  functions  of  the  sentinels. 

1.  Data  select  one 

This  sentinel  is  searched  for  at  the  beginning  of  each  line 
on  the  input  tape.  If  a  data  select  one  character  is  found, 
printed  output  is  assumed  and  the  processing  continues.  If 
any  other  data  select  character  is  present,  other  types  of 
output  are  indicated  and  the  line  is  ignored.  The  next  line 
is  then  brought  in  for  processing. 

2.  BBBBBBBBBBBBBB  (14B's) 

This  sentinel  marks  the  beginning  of  a  message  to  be 
processed  into  Baudot  code.  There  will  be  as  many  sentinels 
of  this  type  on  the  input  tape  as  there  are  messages  to  be  con¬ 
verted. 

3.  *  $  (an  asterisk  followed  by  a  dollar  sign) 

This  signals  the  end  of  the  message  being  converted. 

The  message  is  wrapped  up  when  this  sentinel  is  found  and 
the  sentinel  described  under  3.  1.  1  is  then  searched  for  by  the 
program. 

4.  128  words  (i  block)  of  U's 

This  sentinel  is  written  on  the  input  tape  by  the  TELTYP 
program  itself  before  the  input  tape  is  rewound  and  processing 
is  started.  It  signals  the  end  of  the  input  tape  and  all  processing 
ceases  once  it  has  been  found. 

When  this  sentinel  has  been  located  the  program  will  rewind 
the  intermediate  tape  used  to  store  teletype  output  and  copy  its 
contents  onto  the  input  tape.  The  program  then  exits  to  the 
executive  program. 

15.4  Output 

The  output  consists  of  the  required  conversion  to  Baudot 
code  and  is  written  on  logical  tape  11  (eleven)  following  the  in¬ 
formation  previously  written  on  that  tape.  Processing  of  other 
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programs  requiring  tape  1 1  ( eleven)  for  output,  but  not  requiring 
teletype  conversion,  can  follow  the  termination  of  this  program. 

The  5 -level  paper  tape  output  can  be  obtained  through  use  of 
of  the  UBC  if  data  select  4  is  used. 

15.  5  Processing 

The  TELTYP  program  first  tests  the  input  tape  to  deter¬ 
mine  if  data  is  available  for  conversion  to  Baudot  code.  If  the 
tape  is  in  a  rewound  status  a  comment  is  made  on  the  Flexo 
and  control  is  returned  to  the  executive  program. 

After  it  has  been  determined  that  data  is  available,  a 
block  of  U's  are  written  on  the  tape  following  the  last  piece  of 
information  recorded.  The  tape  is  then  rewound  and  processing 
starts. 

A  search  is  made  for  an  output  line  of  information  written 
under  data  select  one.  Once  this  requirement  has  been  met,  an 
attempt  is  made  to  locate  the  second  sentinel  (14  B's).  If  the  B's 
are  not  located  the  program  returns  to  the  search  for  data  select 
one.  If  the  B’s  are  located  before  the  end  sentinel  (one  block  of  U's) 
is  reached,  conversion  of  the  message  which  follows  is  initiated  by 
the  setting  of  a  logical  switch. 

In  converting  to  Baudot  code  each  character  is  examined. 
Numeric  and  alphanumeric  characters  are  converted  directly 
upon  entry  to  a  dispatch  table.  The  appropriate  shifts  are  deter¬ 
mined  and  placed  in  the  output  buffer  as  required.  Illegal  char¬ 
acters  are  treated  as  blanks  and  a  space  code  is  supplied  to  the 
output  buffer.  Line  feed  can  be  called  for  by  the  insertion  of  an 
8-5  punch  (octal  15).  Two  carriage  returns  and  a  line  feed  are 
supplied  by  the  program  at  the  end  of  each  line  of  information. 

An  octal  32  (asterisk)  is  treated  the  same  as  any  end-of-line 
indicator  (octal  77).  Each  new  line  is  examined  for  the  data  select 
one  character. 

The  character  by  character  evaluation  and  conversion  con¬ 
tinues  until  an  end  of  message  indicator  is  met.  Two  indicators 
are  used:  (a)  an  asterisk  followed  by  a  dollar  sign,  or  (b)  an 
absolute  stop  code  which  normally  signifies  the  end  of  an  output 
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tape.  The  message  will  be  terminated  by  either  signal.  Letter 
shifts  will  be  used  to  fill  out  the  output  area  and  an  end  of  mes¬ 
sage  indication  will  be  given  to  the  operator  via  the  Flexo.  The 
program  then  returns  to  search  for  the  next  message  on  the  in¬ 
put  tape. 

This  process  continues  until  the  block  of  U1  s  is  found.  At 
that  time  the  intermediate  tape,  which  is  used  to  store  the  con¬ 
verted  message,  is  rewound  and  copied  onto  the  input  tape.  The 
block  of  U's  is  written  over  by  the  information  being  added  to  the 
tape.  An  exit  is  then  made  to  the  executive  program. 

15.  5.  1  Error  Indications 

1.  The  following  messages  will  be  typed  on  the  Flexo  and  a  return 
will  be  made  to  the  Exec.  : 

(a)  TAPE  FOR  STANDARD  TTY  CONVERSION  ALREADY 
REWOUND.  JOB  TERMINATED. 

(b)  NON- RECOVERABLE  ERROR  IN  READING  INPUT  TAPE. 
UNABLE  TO  RESTORE  TO  ORIGINAL  POSITION.  REMOVE 
WITHOUT  WRAPUP.  JOB  TERMINATED. 

The  first  message  was  discussed  under  the  input  and  processing 
sections.  The  second  message  is  self-explanatory. 

2.  Other  error  messages  are  as  follows: 

(a)  SUBROUTINE  ERROR  EXIT  FROM  OCTAL _ . 

LOAD  COMPACT  INTO  UPPER  CORE  AND  TAKE  DUMP. 

This  comment  will  be  made  only  if  the  computer  jumps  to 
location  zero  or  three.  A  stop-go  option  is  given.  Go  will  send 
control  to  the  executive  program.  Stop  will  print  out  the  message 
again.  The  operator  is  requested  to  give  a  dump  only  if  the  com¬ 
puter  is  in  a  non- inter ruptable  mode. 

(b)  ERROR  IN  READING  INPUT  TAPE. 

TYPE  GO  TO  ACCEPT  OR  STOP  TO 
TERMINATE. 

This  is  typed  out  whenever  parity  or  sprocket  errors 
are  encountered. 
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(c)  BAD  INTERMEDIATE  TAPE.  CHANGE  TAPE 
AND  TYPE  GO. 

Converted  messages  can  be  lost  when  the  tape  change  is 

made. 


(d)  SCRATCH  OR  INPUT  TAPE  DID  NOT  REWIND, 
TYPE  GO  TO  TRY  AGAIN  OR  STOP  TO 
TERMINATE  JOB. 

This  message  is  self-explanatory. 

(e)  EM 

This  indicates  that  the  end  of  message  indicator  has  been 


encountered. 
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Test  Characters  in  Input  Buffer 


Fill  Input  Buffer  from  Input  Tape 
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Fiv« 

Shi 

Oi 

8u 


KEY: 


Begin  New  Line 
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KEY: 


Begin  New  Line  for  Conversion 


Process  Next  Character 


Write  Output  Buffer 
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(Subroutine  Storit) 


Search  for  Start  of  Next  Msg. 
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(Subroutine 

NEXUS) 

(Subroutine 

Read) 


Retrieve 

Next 

Character 


|  Fill  Input 
I  Buffer  from 
|  Input  Tape 


End  of  Word: 


pGETCARD 


RETURN 


No  / input  Buffer 
Empty  T 


Retrieve  Next 


F  i  ni  *h 
Sentinel 
Found? 


4PHASE 


Rewind 

Intermediate 

Tape 


Backspace 

Input 

Tape 


Copy  Inter. 
Tape  onto 
Input  Tape 


Write  Msg. 
-END 

CONVERSION 
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BMEWSPT,  BMEWS  Paper  Tape  Conversion 
Function 

BMEWSPT  scans  output  messages  from  the  DIP  computer  in 
search  of  possible  SPADATS  messages.  Other  messages  of  variable 
length  are  ignored.  Any  possible  SPADATS  message  is  examined  for 
consistency.  If  the  message  appears  to  be  valid,  certain  control 
bits  are  stripped,  and  the  message  is  converted  to  standard  observa¬ 
tion  format  and  put  out  as  a  binary  tape.  This  binary  output  tape 
is  in  the  format  of  a  system  TTYAINtape  and  is  used  as  direct 
input  to  ORCON. 

Definitions 

The  following  terms  will  be  used  throughout  the  BMEWSPT 
description: 

BMEWS  Character  -  The  format  of  this  character  changes  during 
preparation  of  magnetic  input  tape.  See  BMEWS  word.  It 
originally  consists  of  6  information  bits  preceded  by  a  parity 
(P  )  bit  during  transmission  to  SPADATS. 

BMEWS  Group  -  Consists  of  three  24  bit  BMEWS  words  (input 

tape  format).  There  are  three  BMEWS  groups  in  a  SPADATS 
mes  sage. 

BMEWS  Message  -  Any  message  output  by  the  DIP  which  may  or 
may  not  be  a  SPADATS  message. 

BMEWS  Word  -  Consists  of  three  BMEWS  characters.  The  format 
of  a  BMEWS  word  changes  during  preparation  of  the  magnetic 
input  tape.  Details  appear  in  that  section.  The  format  of  a 
BMEWS  word  is  shown  in  Figure  16.  i. 
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Fig.  16.  1 


BMEWS  Word 
Bit  Number 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

II 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

Chad-  less 
Poper  Tape 

■H 

P 

I 

I 

I 

I 

I 

I 

* 

I 

I 

I 

I 

I 

I 

* 

I 

I 

I 

I 

I 

I 

1 

| 

1 

Five  Channel 
Paper  Tape 

P 

E 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

1 

1 

1 

1 

Input  Tape 

s 

P 

E 

I 

I 

I 

S 

I 

I 

I 

I 

I 

S 

I 

I 

I 

I 

I 

S 

I 

I 

i 

I 

I 

Chad-less  Paper  Tape  -  Original  paper  tape  received  by  SPADATS 

from  the  DIP.  BMEWS  words  appear  as  three  7  bit  characters. 

Control  Bit  -  An  S,  P,  or  E  bit. 

DIP  -  Computer  used  to  process  all  BMEWS  data.  Q-point  data 
(observations)  are  outputted  on  chad-less  paper  tape  and 
received  by  SPADATS. 

E-bit  -  Error  bit.  The  second  bit  of  the  20  bit  BMEWS  word  appear¬ 
ing  on  five  channel  paper  tape.  Set  to  one  if  transmission  errors 
are  detected  between  the  DIP  and  SPADATS, 

Filler  Words  -  Philco  S  character  words  of  all  filler  characters  (32)g. 

Five  Channel  Paper  Tape  -  Intermediary  between  chad-less  paper 
tape  and  magnetic  input  tape.  BMEWS  words  appear  as  four 
5  level  characters. 

I-bit- Information  data  bit.  Any  bit  contained  in  a  SPADATS  message, 
except  for  control  bits. 

P-bit  -  Parity  bit.  The  first  bit  of  the  20  bit  BMEWS  word  appearing 
on  five  channel  paper  tape.  •  ‘ 

P  -bit  -  Parity  bit.  Original  parity  bit  associated  with  a  BMEWS 
character. 

S-bit  -  Sixth  level  bit.  The  sixth  level  (most  significant)  bit  added 

to  each  of  the  four  5  level  characters  on  the  five  channel  paper 
tape  when  preparing  the  magnetic  input  tape. 

SPADATS  Message  -  Three  groups  of  three  BMEWS  words  each  of 
which  contain  Q-point  data. 

TTYAIN  Tape  -  System  input  tape  for  teletype  data  which  is  processed 
by  ORCON  Tape  ID  is  70TTYAIN 
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TYPE  25  Standard  Observation  -  Observation  in  standard  format 

from  a  station  using  a  moving  beam  antenna  with  T  tracking 
capability.  Data  readout  is  automatic. 

Zebra  -  Time  -  Greenwich  Mean  Time. 
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16.  3 


Preparing  Magnetic  Input  Tape 


Fig.  16.  Z 


SPADATS  receives  chad-less  paper  tape  which  is  direct  output 
from  the  DIP  computer.  The  chad- less  paper  tape  is  converted  by 
equipment  to  five  channel  paper  tape  by  decoding  BMEWS  words. 

BMEWS  words  are  decoded  into  four  5-level  characters.  The 
P*  bit  of  each  of  the  three  BMEWS  characters  is  checked  and  deleted. 
The  remaining  18  bits  become  the  least  significant  of  the  20  on  the 
five  channel  paper  tape.  If  the  check  of  the  P*  bits  detected  trans¬ 
mission  errors,  the  E-bit  is  set  to  one.  A  new  parity  bit  is  generated 
and  becomes  the  P-bit.  An  odd  parity  for  the  20-bit  group  results. 

In  preparing  the  input  tape  from  the  paper  tape,  the  reader 
must  be  in  5 -level  binary  mode.  The  equipment  adds  an  S-bit  to 
each  of  the  four  5-level  characters.  Therefore,  the  required  six  bit 
character  will  appear  in  computer  storage.  At  least  one  block  of 
filler  words  must  be  added  via  the  simulator. 


16.  3.  1  Zebra  Time  from  Flexowriter 

Since  SPADATS  messages  do  not  contain  the  zebra  year, 
month,  and  day  of  the  Q-point  data,  these  times  must  be  obtained 
before  conversion  to  standard  observation  format.  Normally,  there 
is  a  restriction  that  input  data  cannot  be  more  than  one  day  old.  Then 
the  year,  month,  and  day  may  be  obtained  from  the  accounting  clock. 
However,  if  the  accounting  clock  is  not  working  properly,  or  is  set 
to  local  time,  or  if  the  input  data  is  more  than  one  day  old,  the 
correct  zebra  time  must  be  obtained  from  the  flexowriter. 
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The  program  first  interrogates  the  accounting  clock  and  con¬ 
verts  the  time  to  BCD.  The  time  is  typed  out  in  the  format  of  YR- 
MM-DD-HHMM  ZEBRA.  If  the  time  is  correct,  the  operator  types 
a  carriage  return  and  the  program  starts  processing  the  messages. 

If  the  time  is  incorrect  the  operator  types  the  requested  YR- 
MM-DD-HHMM  followed  by  a  carriage  return.  The  corrected  time 
is  then  typed  out  for  approval.  See  16.  4.  1-2  for  further  details. 

16.  3.  2  Input  Tape 

A  BMEWS  word  will  appear  on  the  prepared  input  tape  and  in 
computer  storage  as  24  bits.  Since  there  are  9  BMEWS  words  in  a 
SPADATS  message,  a  total  of  at  least  4  l/ 2  Philco  words  are  re¬ 
quired. 

The  input  tape  may  or  may  not  contain  messages  of  varying 
lengths  other  than  SPADATS  messages.  The  program  will  ignore 
extraneous  data.  A  SPADATS  message  consists  of  three  BMEWS 
groups.  Each  BMEWS  group  contains  72  bits.  The  format  of  each 
group  including  control  bits  is  illustrated  in  tables  following  this 
section.  Note,  however,  that  a  BMEWS  message  in  core  does  not 
nec.essarily  start  at  the  beginning  of  a  Philco  half  word.  The  begin¬ 
ning  character  of  a  BMEWS  message  may  be  any  one  of  the  8  charac¬ 
ters  in  a  Philco  word,  therefore,  the  program  examines  each 
character  separately. 

If  the  control  bits  are  ignored  a  BMEWS  message  will 
appear  on  the  input  tape  and  in  core  storage  as  shown  in 
Figures  16.  3  and  16.  4. 
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Group 

Number 

Number 

Bits 

Information  Data 

Representation 
or  Data  Range 

1 

SPADATS  Identifier 

iOO(Binary) 

Group  Count 

OOO(Binary) 

Site  Number 

01  or  10 

(Binary) 

14 

Sequence  Number 

0- 16383 

5 

Time  -  Hours 

0-23 

6 

Time  -Minutes 

0-59 

6 

Time  -Seconds 

0-59 

4 

Time  -  Fractional  Seconds 

0-15/16 

5 

Credence 

Ignored 

6 

No.  Consolidated  Reports 

0-63 

2 

a 

SPADATS  Identifier 

IOO(Binary ) 

H 

Group  Count 

001  (Binary) 

H 

Site  Number 

01  or  10 

Q 

Sequence  Number 

0-16383 

a 

Azimuth  Sign  0  =  *  ,  1  =— 

0  or  1 

II 

Radians 

1 

0-3 

14 

Fractional  Radians 

0-  1 

i 

i 

1 

Range  Rate  Sign  0  =  +,  1  =  -1 

0  or  1 

Nautical  Miles  Per  Second 

0-7 

Fractional  NM/Sec 

3 

SPADATS  identifier 

lOO(Binary) 

Group  Count 

OlO(Binary) 

Site  Number 

01  or  10 

14 

Sequence  Number 

0-16383 

Range  Nautical  Miles 

0-4095 

Fractional  NM 

0  or  5 

Elevation  Angle  Radians 

0-3 

14 

Fractional  Radians 

0-  1 

3 

Blank 

OOOtBinary ) 

Fig.  16.3 
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16.  4 


Output 

BMEWSPT  output  is  a  magnetic  tape  containing  Q-point  data 
converted  to  standard  observation  format.  The  output  tape  is  in  the 
system  TTYAIN  tape  format  described  below  and  is  suitable  for 
input  to  ORCON.  Unused  portions  of  all  blocks  are  filler  words. 


LO 

vO 

ti 

•W 

to 


The  first  word  of  the  first  block  is  the  tape  ID, 

7  0 TTYAIN.  This  indicates  to  the  executive  routine 
that  the  tape  is  an  ORCON  input  tape. 


The  first  word  of  the  second  block  is  the  ORCON 
control  word  BEGINOBS.  This  indicates  to  ORCON 
that  the  following  input  will  be  in  standard  observa¬ 
tion  format. 


The  Q-point  data  converted  to  type  25  standard 
observations  are  written  12  observations  per  block. 
There  are  no  restrictions  on  the  number  of  blocks 
used  for  the  observations  which  are  all  classified 
unknowns. 


The  first  word  of  the  second  to  last  block  is  the 
ORCON  control  word  ENDOFOBS.  This  is  a  signal 
for  ORCON  indicating  the  end  of  the  standard  observa¬ 
tion  input. 


The  first  word  of  the  next  to  last  block  is  the  ORCON 
control  word  ENDADATA.  This  indicates  to  ORCON 
that  there  is  no  more  input  from  the  TTYAIN  tape. 


The  last  block  contains  120  words  of  Z*  s 


Each  generated  observation  will  occupy  the  equivalence  of  ten 


Philco  computer  words  on  the  output  tape.  Each  observation  will  be 
in  the  standard  observation  format  shown  in  figure  16.  6. 
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Processing 


BMEWSPT  obtains  the  zebra  year,  month,  and  day  of 
observation  from  the  accounting  clock  and/or  from  corrections 
entered  via  the  Flexowriter.  The  two  header  blocks  containing 
the  tape  identification  70TTYAIN  and  the  ORCON  control  word 
BEGINOBS  as  their  first  words  respectively  are  written  on  the 
output  tape.  The  input  data  is  then  transfered  to  the  data  storage 
area.  If  the  data  storage  area  does  not  contain  any  zero  characters, 
the  message,  "MAY  BE  CODE  MODE"  is  typed  on  the  Flexo.  This 
indicates  that  the  input  tape  may  have  been  prepared  from  the  five 
channel  paper  tape  under  code  mode,  which  ignores  blanks,  rather 
than  binary  made  which  converts  blank  paper  tape  to  zero  characters 
This  is  only  a  possible  error  message. 

The  program  then  searches  for  a  SPADATS  message.  Each 
character  in  core  is  examined  until  one  is  found  which  has  100  as 
the  last  three  bits.  This  is  tentatively  assumed  to  be  the  SPADATS 
identifier.  The  next  three  information  bits  are  checked  and  should 
indicate  the  first  group  count,  000.  If  they  are,  the  bits  correspond¬ 
ing  to  the  SPADATS  identifiers  and  group  counts  for  the  second  and 
third  groups  are  examined.  If  they  agree  with  the  expected  values, 
the  site  and  sequence  numbers  from  the  first  group  are  compared 
with  the  corresponding  values  in  the  second  and  third  groups.  If 
there  is  agreement  and  if  the  site  number  is  1  or  2,  it  is  assumed 
that  a  SPADATS  message  has  been  located.  If  any  test  fails,  the 
search  for  the  SPADATS  identifier  continues  with  the  character 
following  the  original  character  with  100  as  its  last  three  bits. 

After  a  SPADATS  message  is  found,  the  Q-point  data  is 
converted  to  a  type  25  standard  observation.  The  sequence  number 
is  converted  to  BCD.  The  site  number  is  converted  to  station 
number  by  a  table  look  up.  The  zebra  time  is  converted  to  BCD. 
Year,  month,  day  are  obtained  from  the  accounting  clock  or  Flexo¬ 
writer  while  hours,  minutes,  and  seconds  are  obtained  from  the 
Q-point  data.  The  credence  is  ignored. 


€ 


€> 
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The  number  of  consolidated  reports  is  used  in  the 
determination  of  the  accuracy.  The  first  three  of  the  six 
bits  form  a  binary  number,  0-7.  This  number  is  subtracted 
from  7  to  give  the  accuracy.  A  resultant  accuracy  of  0  corresponds 
to  a  large  number  of  reports.  An  accuracy  of  8  or  9  may  result 
from  the  detection  of  one  or  more  parity  errors,  respectively. 

An  error  count  is  made  up  of  the  sum  of  the  9  E-bits  and  the 
number  of  bad  parity  checks.  A  non-zero  error  count  results  in 
an  8  or  9  accuracy. 

If  the  azimuth  is  positve,  there  is  a  direct  conversion  from 
radians  to  circles.  If  it  is  negative,  the  magnitude  is  substracted 
from  2 t t  and  converted  to  circles. 

Elevation  is  converted  to  circles.  If  the  result  is  greater 
than  0.  25,  one-half  circle  is  added  to  the  azimuth  and  the  elevation 
is  subtracted  from  0.  5.  The  resultant  elevation  and  azimuth  values 
are  converted  to  degrees. 

Range  and  range  rate  are  converted  to  kilometers  and 
kilometer^/ second  respectively.  Because  the  output  range  rate 
has  nine  characters,  the  integer  and  fractional  parts  are  processed 
separately. 

The  resultant  observations  are  written  out  on  the  output  tape, 
12  observations  per  block.  After  all  data  has  been  processed,  and 
all  observations  written  on  the  output  tape,  two  blocks  containing 
the  ORCON  control  words  ENDOFOBS  and  ENEk^DATA  as  their 
first  words  respectively  are  written  on  the  output  tape.  The  last 
block  written  on  the  output  tape  contains  120  words  of  z*  s.  The 
output  tape  is  now  ready  to  be  processed  by  ORCON. 
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C 

Flexowriter  Messages 

1.  MOUNT  SCRATCH  ON  UNIT  7  AND  INPUT  ON  UNIT  0. 

This  message  is  typed  at  the  start  of  the  program.  After 
typing  this  message,  the  program  goes  to  the  STOP-GO  routine. 

The  program  will  begin  when  the  operator  types  GO. 

2.  YR-MM-DD-HHMM  ZEBRA 

The  zebra  time  at  the  start  of  the  program  is  typed  for  the 
operator'  s  approval.  One  or  more  of  the  zebra  groups  may  be 
altered  by  the  operator.  The  groups  are  separated  by  hyphens. 

See  16.  3.  1 . 

a.  TRY  AGAIN 

This  message  is  typed  if  the  operator  makes  an  error  in 
typing  in  the  requested  time.  Program  waits  for  another  type 
in  of  the  time  and  retests. 

b.  ILLEGAL  DATE- TIME.  RETRY 

Typed  if  an  illegal  group  in  the  zebra  time  is  found  such  as 
a  month  >  12.  The  operator  will  then  type  in  a  new  zebra  time  which 
will  be  tested. 

3.  WRITE  ERRORS 
READ  ERRORS 
PROC  ERRORS 

Appropriate  comment  is  typed  if  tape  errors  occurred  and 
could  not  be  corrected.  Control  returns  to  the  executive  routine 
after  typeout. 

4.  INPUT  MAY  BE  CODE  MODE 

This  message  indicates  that  the  paper  tape  may  have  been 
converted  to  the  magnetic  input  tape  under  code  mode  instead  of 
binary  mode.  The  program  tests  one  block  for  zero  characters. 

If  no  zero  characters  are  found,  the  above  message  is  typed  on  the 
Flexo.  The  program  then  continues  normally. 
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Punched  card  output,  if  specified,  is  under  control  of  a 
PATH  switch  which  eliminates  multiple  punching  of  the  same 
ephemeris  data.  This  switch  also  controls  the  production  of  an 
ephemeris  tape  from  a  set  of  ephemeris  cards.  This  switch  equals 
one  (1)  for  the  first  time  through  the  program,  for  a  particular  set 
of  ephemeris  data,  and  two  (2)  for  each  subsequent  pass  through 
the  program  for  this  same  data.  It  can  be  reset  to  one  by  reading 
a  negative  station  number.  Thus  ephemeris  cards  are  punched,  or  an 
ephemeris  tape  made,  only  on  the  first  pass  through  the  program  for 
that  particular  set  of  ephemeris  data.  , 

9.  5. 1  Error  Message 

If  the  program  is  unable  to  read  the  ephemeris  tape,  the 
comment  EPHEMERIS  TAPE  TROUBLE  will  be  written  on  the 
output  tape.  In  addition,  the  comment  PROGRAM  TERMINATED 
DUE  TO  EPHEMERIS  TAPE  TROUBLE  will  appear  on  the  Flexo, 
and  control  will  return  to  the  executive  routine. 


1-16-13 


BMEWSPT 


Wolf  Research  and  Development  Corporation 


KEY: 

© 


Beginning  of  Processing 
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KEY: 

© 


Detailed  Examination  of  the  Data  Word 


1-16-15 


Wolf  Reworch  and  Development  Corporation 


BMEWSPT 


BMEWSPT 


Wolf  Research  and  Development  Corporation 


Wolf  Research  and  Development  Corporation 


BMEWSPT 


(Subroutine  Daytime) 


Convert  Accnt 
Clock  Time 
to  Binary  and 
to  BCD 

1 

f  TYPZ 

Flexo  Output: 
YR-MM-DD-HH 
MM  ZEBRA 

r  REDO 

* 

Accept  Change  t 
to  Year  via 

ANYINPT 

1 

f 

Accept  Chonges 
to  Month  via 

ANYINPT 

□ 

f 

— 

Accept  Changes 
to  Day  via 

ANYINPT 

_ _ _ _ 

1 

r 

Accept  Changes 
to  Hour  via 

ANYINPT 

1 

- 

Accept  Changes 
to  Minute  via 
ANYINPT 

KEY:r^ 

(AT  1  Examines  Changes  Entered 
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SECTION  Z 

SUBROUTINES  AND  FUNCTIONS 


This  section  contains  descriptions  of  subroutines  and  functions  which 
are  used  by  many  of  the  programs  described  in  Section  1.  All,  with  the 
exception  of  XYZSB,  have  been  written  with  the  linkage  required  by  FORTRAN 
or  ALTAC.  The  description  of  XYZSB,  which  was  written  by  Aeronutronic,  a 
division  of  the  Ford  Motor  Company,  has  been  included  to  serve  as  a  conven¬ 
ient  reference  within  this  volume. 

The  functions  described  are  used  to  perform  intermediate  calculations 
and  produce  a  single  valued  result.  The  subroutines  perform  a  series  of  cal¬ 
culations  and  may  produce  more  than  one  result. 


Number 

Name 

Title 

Type 

1 

CONYRB 

Obtain  year  constants 

S 

Z 

NHOLY 

Remove  overpunch  (fix.  pt.  ) 

F 

3 

PROPR 

Properize  argument  (0  to  Z  -tt) 

F 

4 

SDAY 

Gregorian  date  from  Smithsonian  day 

S 

5 

SHOLY 

Restore  Hollerith  sign 

F 

6 

SMITH 

Obtain  theta  Greenwich 

F 

7 

UNHOLY 

Remove  overpunch  (fit.  pt.  ) 

F 

8 

YRDAY 

Convert  to  Smithsonian  day  from  yr.  ,  day 
of  yr. 

S 

9 

YRMDY 

Convert  to  Smithsonian  day  from  yr.  ,  mth.  , 
day 

S 

10 

XYZSB 

Analytical  integration  routine 

S 
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1.  1 
1.  2 


1.  3 


1.  4 


1.  5 


CONYRB ,  Year  Constants  (Subroutine) 

Purpose 

CONYRB  is  used  to  obtain  Theta  Greenwich,  the  celestial 
longitude  of  the  sun,  and  the  difference  between  the  longitude  of  the 
sun  and  the  argument  of  perigee  of  the  sun  at  the  start  of  a  year. 

Use 

Call  CONYRB  (IX,  XI,  X2,  X3,  X4,  X5,  X6,  X7,  X8) 

Input 

IX  must  be  a  fixed  point  integer  equal  to  the  last  digit  of  the 
year.  No  further  arguments  are  necessary  for  entry  to  the  sub¬ 
routine. 


Output 

Upon  exit  from  the  subroutine,  the  arguments  represent  the 
following  constants: 


IX 

XI 

X2 

X3 

X4 

X5 


(Fixed  point)  =  last  digit  of  the  year. 

(Floating  point)  =  year. 

(Floating  point)  =  Theta  Greenwich  at  start  of  year. 
(Floating  point)  -  celestial  longitude  of  the  sun. 

(Floating  point)  =  .  01  7202789 

(Floating  point)  =  difference  between  the  longitude  of  the 
sun  and  argument  of  perigee  of  the  sun. 


X6  (Floating  point)  =  .  0334502. 
X7  (Floating  point)  =  .  043053055. 
X8  (Floating  point)  =  .  43365539. 
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2.  1  NHOLY,  Remove  Hollerith  Overpunch  (Function) 

2.  Z  Purpose 

NHOLY  is  used  to  remove  an  overpunched  sign  and  to  convert 
the  argument  to  the  absolute  value  of  the  fixed  point  integer. 

2.  3  Use 

NHOLY  (IX) 

2.  4  Input 

The  argument  (IX)  contains  any  left  justified  BCD  character 
which  may  include  an  overpunched  sign. 

2.  5  Output 

NHOLY  yields  the  absolute  value  of  the  fixed  point  integer 
contained  in  the  left  most  BCD  character  of  the  original  argument. 
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3.  1  PROPR,  Properize  Argument  (Function) 

3.  2  Purpose 

PROPR  is  used  to  properize  an  angle,  i.  e.  ,  find  the  value 

of  the  angle  between  0  and  2 it.  If  x  is  any  angle  in  radians, 

PROPR  =  [  X]  ,  _  . 

(o,  2  t t) 

3.  3  Use 

PROPR  (X) 

3.  4  Input 

The  angle  (X)  must  be  in  floating  point  radians.  There  is  no 
restriction  on  its  value. 

3.  5  Output 

PROPR  yields  the  value  of  the  angle  (X)  in  the  range 
0  <  X  <  2  7T. 
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4.  1 
4.  2 


4.  3 


4.  4 


4.  5 


4.  6 


SDAY,  Gregorian  Date  from  Smithsonian  Day  (Subroutine) 
Purpose 

SDAY  is  used  to  convert  the  Smithsonian  day  number  to 
Gregorian  day,  month,  and  year. 

Use 

Call  SDAY  (SDATE,  YEAR,  YRDATE,  MO,  HMO,  DATE) 


Input 

SDATE  Is  the  floating  point  Smithsonian  day  number.  No 
further  arguments  are  necessary  for  entry  to  the  subroutine. 


Output 


Upon  exit  from  the  subroutine  the  arguments  represent  the 
following  quantities: 


vSDATE 

YEAR 

YRDATE 

MO 

HMO 

DATE 


(Floating  point)  =  Smithsonian  day  number. 

(Floating  point)  =  year,  i.  e.  ,  1963 

(Floating  point)  =  day  number  in  year. 

(Fixed  point)  =  month  number. 

(Alphanumeric)  =  month  (3  BCD  characters) 
abbreviation,  i.  e.  ,  JAN. 

(Floating  point)  =  day  number  in  month. 


F  ormulation 


F 

Y 


=  Smithsonian  day  -15018 


F 

365.  25 


+  1900 


[x]  =  integer  function  of  x 
A  =  [  365.  25y  +  .  9] 
year  day  =  F  -  A 

If  year  day  <  0,  y  =  y  -  1  recompute  A  and  year  day. 
B  =  365.  25y  +  .  9  -  A 
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=  1  if  B  -  82  0  (leap  year  add  1  day) 

On 

=  0  if  B  -  .  8  <  0 

V- 

J  =  year  day  -  59  -  C 

If  J  2  0,  h  =  30.  1;  otherwise  h  =  32,  3  -  C 
+  2 

E  =  [  30.  6  month  -  h] 

If  year  day  £  E  subtract  1  from  the  month  and  recompute  E. 
Otherwise  day  number  in  month  =  year  day  -  E. 
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5.  1  SHOLY,  Restore  Hollerith  Sign  (Function) 

5.  2  Purpose 

SHOLY  is  used  to  interpret  the  original  overpunched  BCD 
argument  in  terms  of  an  algebraic  +  or 

5.  3  Use 

SHOLY  (X,  Y) 

5.  4  Input 

SHOLY  requires  two  arguments.  The  first  argument  (X)  is 
the  overpunched  BCD  character.  The  second  argument  (Y)  is  the 
unsigned  value  of  the  first  argument  (X)  in  floating  point. 

5.  5  Output 

SHOLY  yields  the  signed  floating  point  value  of  the  second 
argument. 
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6.  1  SMITH,  Obtain  Theta  Greenwich  (Function) 

6.  2  Purpose 

SMITH  is  used  to  obtain  Theta  Greenwich  in  degrees  fov  the 
start  of  the  year. 

6.  3  Use 

SMITH  (X) 

6.  4  Input 

The  argument  (X)  is  the  last  digit  of  the  year  expressed  in 
floating  point. 

6.  5  Output 

SMITH  yields  the  proper  Theta  Greenwich  (X)  in  degrees. 
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7.  1 
7.  2 


7.  3 


7.  4 


7.  5 


UNHOLY,  Remove  Hollerith  Overpunch  (Function) 

Purpose 

UNHOLY  is  used  to  remove  an  overpunched  sign  and  to  con¬ 
vert  the  argument  to  an  unsigned  floating  point  number. 

Use 

UNHOLY  (X) 

Input 

The  argument  (X)  .contains  any  left  justified  BCD  character 
which  may  include  an  overpunched  sign. 

Output 

UNHOLY  yields  the  absolute  value  of  the  floating  point 
number  contained  in  the  left-most  BCD  character  of  the  original 
argument.  UNHOLY  uses  the  function  NHOLY. 
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8.  3 


8.  4 


8.  5 


8.  6 


YRDAY,  Smithsonian  Day  from  Year  and  Day  of  Year  (Subroutine) 
Purpose 

YRDAY  is  used  to  convert  the  Gregorian  year,  and  day 
number  to  Smithsonian  day. 

Use 

Call  YRDAY  (YRDATE,  YEAR,  SDATE) 

Input 

YRDATE  is  the  floating  point  day  number  of  the  year  and 
YEAR  is  the  floating  point  year,  i.  e.  ,  1963. 

Output 

Upon  exit  from  the  subroutine  the  arguments  represent  the 
following  quantities: 

YRDATE  (Floating  point)  =  day  number  of  year. 

YEAR  (Floating  point)  =  year. 

SDATE  (Floating  point)  =  Smithsonian  day. 

F  ormulation 

[x]  =  integer  function  of  x 

y  =  year  -  1900 
A  =  [  365.  25y  +  .  9] 
d  =  day  number  of  year 

c  =  15018,  Smithsonian  day  number  of  January  1,  1900 
Smithsonian  day  =  A  +  d  +  c. 
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9.  1  YRMDY,  Smithsonian  Day  from  Year,  Month,  Day  (Subroutine) 

9.  2  Purpose 

YRMDY  is  used  to  convert  the  Gregorian  year,  month,  and 
day  to  Smithsonian  day. 

9.  3  Use 

Call  YRMDY  (MO,  DATE,  YEAR,  SDATE) 

9.  4  Input 

MO  is  the  fixed  point  integer  month  number,  DATE  is  the 
floating  point  day  number  of  the  month  and  YEAR  is  the  floating 
point  year,  i.  e.  ,  1963. 

9.  5  Output 

Upon  exit  from  the  subroutine  the  arguments  represent  the 
following  quantities: 

MO  (Fixed  point)  =  month. 

DATE  (Floating  point)  =  day  number  of  month. 

YEAR  (Floating  point)  =  year. 

SDATE  (Floating  point)  =  Smithsonian  day. 

9.  6  F ormulation 

[x]  = 

y 

m  = 
d 

A  = 

B 

r 

h 

c  = 

Smithsonian  day  =  [  30.  6m  -  h]  +  d  +  A  +  c. 


integer  function  of  x 
year  -  1900 
month  of  year 
day  of  month 
[  365.  25y  +  .  9] 

365.  25y  +  .  9  -  [  365.  25y  +  .  9] 

32.  3  if  B-. 8  —  0  (leap  year,  add  1  day) 

31.  3  if  B  -  .  8  <  0 

15018,  Smithsonian  day  number  of  January  1,  1900 
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10.  1 


10.  z 


10.  3 


10.  4 


XYZSB,  Analytical  Integration  Routine 

This  routine  was  written  by  Aeronutronic.  A  complete 
description  of  the  subroutine,  including  equations,  appears  in  the 
Aeronutronic  Publication  U-169'l,  pages  4-7S. 


P*  r no  s  e 


XYZSB  computes  the  predicted  position,  r,  and  velocity, 
r,  at  some  given  time,  t.  The  N,  M  orbital  elements  at  some  epoch 
time,  tQ,  must  be  supplied  upon  entry  to  the  routine  (c.  f.  Fig.  10.  1). 

Calling  Sequence 


TIXZ 

JMP 


10,  2 
«  20,  2 
30,  2 
XYZSB 


Input 


Index  register  two  (XR2)  must  be  set  equal  to  10,  20  or  30 
upon  entry.  The  significance  of  this  setting  will  be  explained  under 
the  output  section  (10.5)  and  will  be  referred  to  as  the  exit  flag. 


The  following  quantities  must  be  available  in  the  indicated 
locations  upon  entry  into  this  routine:  (See  Assign  Table). 


Location 

Symbol 

Contents 

T 

t  -  t 

Time  interval  in  minutes 

o 

since  epoch  time,  t 

AO 

a 

o 

Semi-major  axis  at  t 

QO 

% 

Perigee  distance  at  t 

EO 

e 

o 

Eccentricity  at  t 

XNO 

n 

o 

Mean  angular  motion  at  t 

XYZSB 
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AXNO 

a  N 
x  o 

► 

Components  in  orbit  plane 

at  t  of  a  =  eP 
o  —  — 

AYNO 

XNODEO 

a  N 

y  o 

ft 

o 

Longitude  of  ascending  node 

at  t  in  radians 

0 

XLO 

L 

o 

Mean  longitude  at  t  radians 
o 

C 

c" 

Drag  coefficient 

XM4CG3 

(-4/3)c" 

COSI 

cos  i 

=  w 

z 

Cosine  of  the  inclination 

XKELSO 

k  L 
e  so 

XNX+2 

N  = 
z 

0 

XMX+2 

s 

N 

II 

sin  i 

XKE 

k  =  0.  07436574 
e 

a  constant 

XJGRCF 

k  Nfii  Ja  2  =  0.  120717 

-3 

x  10  ,  a  constant 

e  e 


Index  register  two  (2)  must  be  set  equal  to  10,  20  or  30  upon  entry. 
The  significance  of  this  setting  will  be  explained  below  under  Output 
and  will  be  referred  to  as  the  exit  flag. 

10.5  Output 

1.  (XR2)  =  10,  20  or  30 

If  the  exit  flag  is  equal  to  10,  20  or  30  the  following  quantities 
are  available  upon  exit  from  this  routine  in  the  indicated  locations: 


Location 

Contents 

Location 

Contents 

A 

a 

ESQ 

2 

e 

E 

e 

XNODE 

ft  (rad) 

P 

P 

XNODOT 

ft  (rad/min) 

RTP 

\lp 

RTA 

N/a 

XN 

n 

2.  (XR2)  =  30 

If  the  exit  flag  is  equal  to  20  or  30  the  following  is  also  output: 
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XYZSB 


Location 

Contents 

Location 

Contents 

OMGDT 

c3  (rad/min) 

RTESQ 

v- 

2 

e 

OMGAS 

co  (rad) 
s 

XL 

L  ( 

rad) 

AXN 

axN 

U 

U  (mod  2t r)  (rad) 

AYN 

ayN 

3.  (XR2)  = 

30 

If  the 

exit  flag  is  equal  to 

30  the  following 

is  also  output: 

Location 

Contents 

Location 

Contents 

SINO 

sin  £2  =  N 

y 

UX 

U 

X 

COSO 

co  s  ^  =  N 

X 

UY 

U 

y 

► 

U 

wx 

W 

X 

UZ 

u 

z 

WY 

W 

y 

VX 

v  1 

X 

XMX 

M 

X 

VY 

Y 

y 

* 

V 

XMY 

M 

VZ 

V 

Y  /  “ 

z 

DENM 

a  +. 

^1  -  e^)  1  -  e 

X 

X  ' 

COSEO 

cos  (E  +  co) 

Y 

y 

► 

r 

SINEO 

sin  (E  +  co) 

Z 

z 

ESINE 

e  sin  E 

RDOT 

r 

ECOSE 

e  cos  E 

RVDOT 

rv 

R 

r 

XDOT 

X 

AR 

a/r 

YDOT 

y 

► 

r 

SINU 

sinu 

ZDOT 

z 

COSU 

cos  u 

. 
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NORTH 

CELESTIAL  POLE 
Z 


To  the  Vernal 
Equinox 


PROJECTION  OF  ORBIT  ON  CELESTIAL  SPHERE,  WITH  ORIENTATION 
UNIT  VECTORS  AND  ANGLES  DISPLAYED 

Fig.  10. 1 
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Elements 


Element  Card  Formats: 

All  programs  accept  a  standard  7-card  element  set  as  input. 

The  formats  for  these  cards  appear  on  the  following  pages.  Those 
columns  which  are  shaded  are  not  used.  In  all  floating  point 
numbers,  the  decimal  point  may  be  placed  anywhere  in  the  field. 
Numbers  requiring  an  exponent  indicator  such  as  c^,  d^,  and  c^, 
must  be  in  one  of  the  following  formats: 

+  . DDDDDDDDE  +  XX 

+  .  DDDDDDDDAA  +  X 

+  , DDDDDDDD +  XXX 

All  programs  except  ASUM,  SSUM,  ISUM,  PSR,  and  RESPLT 
will  also  accept  a  6- card  element  set.  Fields  which  differ  from  those 
of  the  7- card  element  set  are  noted  in  the  rightmost  column  of  the  card 
format  description. 
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Field 

Columns 

7-Card  Element  Set 

6-Card  Element  Set 

1 

1-3 

Satellite  Number,  Right 
Justified 

Same 

2 

4-6 

Element  Set  Number,  Right 
Justified 

Same 

3 

8 

Card  Number  =  1 

Same 

4 

9-18 

Satellite  Name,  Alpha¬ 
numeric 

Same, except  in  Col.  9-20 

5 

23-36 

Epoch  Revolution  Number, 
(Nq),  Right  Justified 

Same 

6 

37-50 

Eccentricity,  (e) 

Same 

7 

51-64 

Inclination,  (i) 

Same 

8 

80 

Card  Type  =  E 

Blank 

c 

Element  Card  (1  qf  7) 


3-1-2 


Field  Columns  7 -Card  Element  Set  6-Card  Element  Set 

1  1-3  Satellite  Number,  Right  Same 

Justified 

2  4-6  Element  Set  Number,  Right  Same 

Justified 

3  8  Ca.rd  Number  =  2  Same 

4  9-12  Epoch  Year  Same 

5  23-36  Epoch  Time,  (T  ),  in  Days  Same 

of  Year  u 

6  37-40  Not  Used  Epoch  Year  of  Decay 

7  51-64  Mean  Orbital  Longitude,  Epoch  Time  of  Decay  in  Days 

(Lq),  in  .Degrees  of  Year 

8  80  Card  Type  =  E  Blank 


Element  Card  (2  of  7) 
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Element  Card  (3  of  7) 


Field 

Columns 

7 -Card  Element  Set 

< 

6- Card  Element  Set 

1 

1-3 

Satellite  Number,  Right 
Justified 

Same 

2 

4-6 

Element  Set  Number,  Right 
Justified 

Same 

3 

8 

Card  Number  =  3 

Same 

4 

9-22 

Anomalistic  Period  at 

Epoch,  (P  ),  in  Days/  Rev. 

Nodal  Period  at  Epoch,  (P  ) 

5 

23-36 

Right  Ascension  of  Ascending 
Node  at  T  P  (Qq),  in  Degrees 

Same 

6 

37-50 

Argument  of  Perigee  at  T  , 

(u  q),  in  Degrees 

Same 

7 

51-64 

Perigee  Distance,  (Qq)  in 
Earth  Radii 

Same 

8 

80 

Card  Type  =  E 

Blank 

Element  Card  (3  of  7) 
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Elements 


Element  Card  (4  of  7) 


0  0  0  0 


Mil 


0  OOM 

4  3  I  \« 
1  1 


2  2  212 
3  3  3 

444 

b  5  5 
666 

7  77 

8  8  8 
9  9  9 

i  z  1 


2  IT 2! 

\  ! 

3  3  3R3| 

4  4  4^4 

N 

5  5  5  ^5 

6  6  6  ^6 

|7  7  7W71 

8  3  8  1,8 

9  9  9  ^9 

<  s  •  jv|e  | 

VOF 


|0  0  0.0  0  0  0  0  0  0  0  0  0  0 

S  10  11  1 1  *3  14  IS  II 17  11  II  2121  72 

11  t  i  1 11  11  M  M  1 

L  2  2  2  2  2  2  2  2  2  2  2  2  2 

33333333333333 

44444444444444 

55555555555555 
66666666666666 
[7  7777777777777 

83888008888888 
9  9  9  9  9  9  9  9  9  9  9  9  9  9 

$  19  11  12  12  M  IS  II  17  11  II  20  21  22 

»Ev  5031  - — 


5 

00000000000000 

23  24  25  21  2/  21  21  30  31  32  33  34  35  36 

11111111111M1 

22222222222222 

33333333333333 

44444444444444 

55555555555555 

66666666666666 

77777777777777 

88888865989886 

99999999999999 

23  24  25  26  27  20  21  30  31  32  33  34  35  36 


6 

7 

_ 

8 

tttttttTTTTTT1 

[in  ill  illi  ill 

■ 

11111111111111 

11111111111111 

■ 

22222222222222 

22222222222222 

33333333333333 

33333333333333 

I 

44444444444444 

44444444444444 

59555555555555 

55555555555555 

5 

66666666666666 

66666666666666 

6 

77777777777777 

77777/77777777 

7 

88888888688888 

88886888888888 

lls® 

8 

99999999999999 

99999999999999 

9 

00 

Field  Columns  7  -  Card  Element  Set 


6- Card  Element  Set 


1 

2 

3 

4 

5 


6 

7 

8 


1-3 


4-6 


8 

9-22 

23-36 


37-50 

51-64 

80 


Satellite  Number,  Right 
Justified 

Element  Set  Number,  Right 
Justified 

Card  Number  =  4 

Rate  of  Change  of  P  ,  (c  ), 
in  Days/ (  Rev.)  2,  a  a 
+ . DDDDDDDDE- XX 

First  Derivative  with  Respect 
to  Time  of  Right  A§cension  of 
Ascending  Node,  (  i n 

Deg/  Day 

First  Derivative  with  Respect 
to  Time  of  the  Argument  of 
Perigee,  (gj  ),  in  Deg/  Day 

Not  Used 


Card  Type  =  E 


Same 

Same 

Same 

Rate  of  Change  of  P  ,  (c  ), 

+  D.  DDDDDDDE-XX11  n 

Same 

Same 

First  Derivative  with  Respect 
to  Time  of  Perigee  Distance 
(Qo),  +  D.  DDDDDDDE-XX 

Blank 


Element  Card  (4  of  7) 
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Field 


Columns 


7 -Card  Element  Set 


6- Card  Element  Set 


23-36 


37-50 


51-64 


Satellite  Number,  Right 
Justified 

Element  Set  Number,  Right 
Justified 

Card  Number  =  5 

Rate  of  Change  of  c  ,  (d  ), 
in  Days/(  Rev  )3  9  a  a 

+  D.  DDDDDDDDE-  XX 

Not  Used 


Not  Used 


Not  Used 


Card  Type  =  E 


Same 


Same 


Same 

Second  Derivative  with  Respect 

to  Time  of  the  Rate  of  Change  of 

P  ,  c  ),  +  D.  DDDDDDDE-XX 
n  n'  — 

One-Half  of  Second  Derivative 
with  Respect  to  Time  of  RA  , 
(1/2  RAQ)f  +  D.  DDDDDDDE-XX 

One-Half  of  Second  Derivative 
with  Respect  to  Time  of  o  , 

(1/  2  u  ),  +  D.  DDDDDDDE  -  XX 

One-Half  of  Second  Derivative 
with  Respect  to  Time  of  Qq, 

(i/2  ‘6q),  +  D.  DDDDDDDE-XX 

Blank 


Element  Card  (5  of  7) 
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Elements 


Element  Card  (6  of  7) 


000 

t  2  i 

I  1  1 
222 
333 
444 
555 
666 
777 
S  8  81 
9  9  s| 

I  2  1 


00 
4  3  • 

1  I 


offlo 


22  2 
3  3  3 
44  4 
555 
666 
77  7 
88 


* 

3 


|0  0  0  0  0  0  0  0  0  0  0  0  0  0 

*  II  II  t?  13  14  13  II  11  II  tl  20  21  72j 

1 1 1  i  It  11 11 11 1 1 


* 

H5 

T 

X|7 

8^8 


*2222222222222 
33333333333333 
4  4  4  4  4  4  4  4  4  4  4  4  4  4| 
55555555555555 
6  6  6  6  6  6  6  6  6  6  6  6  6  6| 
7777777777777 
8888888888888 


00000000000000 

|a  24  25  21  2/  21  23  30  31  32  33  34  35  *| 

11111111111111 

22222222222222 
33333333333333 
44444444444444 
55555555555555 
66666666666666 
717  7  7  7  7  7  7  7  7  7  7  7  7  7 


0000000000000 

37  31  39  40  41  47  43  44  45  41  47  41  41 54| 

iiiitiimm 


o|o  ooo  o  oooo  oo  ooo| 

51  52  53  54  55  51  57  51  51  H  It  17  » 

iimniiitii 


2222222222222 

3333333333333 

4444444444444 

5555555555555 

6666666666666 

7777777777777 


8888888888888888888888888888 


1  1 

222222222222222 

333333333333333 

444444444444444 

555555555555555 

666666666666666 

777777/77777777 

I 

888888868888888 


9  9  9t 


9999399999999 

I  t|  11  12  13  14  IS  II  17  II  !•  20  21  22] 

LEY  5081  - 


73  24  2S  21  27  21  29  30  31  12  31  X  35  *  37  31  31  41  4)  42  43  44  45  41  47  «  IS  5*,1  52  S3  S4  S*  SI  V  SI  91  M  (1  12  « 


Field 

Columns 

7- Card  Element  Set 

6- Card  Element  Set 

1 

1-3 

Satellite  Number,  Right 
Justified 

Same 

2 

4-6 

Element  Set  Number,  Right 
Justified 

Same 

3 

8 

Card  Number  =  6 

Same 

4 

9-22 

Semi-Major  Axis,  (a), 
in  Earth  Radii 

Limit  of  A  T 

n 

5 

23-36 

Nodal  Period  at  Epoch,  (P  ), 
in  Days/Rev. 

Limit  of  ARA  in  Columns  23-32 
Limit  of  AH  in  Columns  33-36 

6 

37-50 

Rate  of  Change  of  P  ,  (c  ) 
in  Days  /(  Rev  )2  h  1a 

+  •  DDDDDDDDE-  XX 

Standard  Brightness 

7 

51-64 

Not  Used 

Phase  Angle  Coefficient 

8 

80 

Card  Type  =  E 

Blank 

Element  Card  (6  of  7), 


3-1-7 


Field  Columns  7-Card  Element  Set 


1  1-3 

2  4-6 

3  8 

4  23-29 

5  30-36 

6  37-50 


7  51-58 

8  59-66 

9  67 

10  80 


Satellite  Number,  Right  Justified 
Element  Set  Number,  Right  Justified 
Card  Number  =  7 

Initial  Revolution  Number,  (N^),  Right  Justified 

Final  Revolution  Number,  (N^,  Right  Justified 

Bulletin  Expiration  Time  in  YMMDDHHMMSS.  SS, 
Decimal  Point  in  Column  48 

Root  Mean  Square  of  Error,  in  Kilometers,  (RMS) 


Number  of  Observations  Used  to  Determine  RMS 
.  Q  r  Blank  =  Correct  i 
1-  °P  ^  1  =  Do  not  correct  i 


Card  Type  =  E 


Element  Card  (7  of  7) 
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Sensor 


Field  No. 

Columns 

Description 

1 

1-4 

Sensor  Number 

2 

5-11 

4>°/  +  N  \-  Latitude(As  sumed  Decimal  Between  Cols.  7-8) 

ov-s  / 

3 

12-19 

X  /  +  W  \-  Longitude  (Assumed  Decimal  Between  Cols.  15-16) 
\-E/ 

4 

20-25 

H  (meters)  -  Altitude  (Assumed  Decimal  After  Col.  25) 

5 

26 

Classification 

6 

27-30 

Sensor  Type 

7 

31-34 

Previous  Sensor  Number 

8 

35-36 

Number  Within  Sensor  Complex 

9 

37-54 

Name  ,  . 

10 

55-56 

Equipment  type 

11 

57 

Continent 

12 

58-59 

Country  or  State 

13 

60-72 

Comments 

14 

79 

Look  Angle  Coordinate  Indicator 

15 

80 

Card  Type  (code  type  =  S  Punch  0,  2) 

Station  or  Sensor  Card 
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Observation 
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COLUMN  10  (ACCURACY) 


Either  accuracy  or  signal  strength  may  be  indicated  in  column  10, 
coded  according  to  the  following: 


If  Type,  in  columns  4  and  5,  is  31  or  greater,  column  10  contains 
signal  strength.  If  Type  is  30  or  less,  column  10  contains  accuracy. 


Code  Figure 


Accuracy 


Signal 


0 


Normal  observations  made  under  Signal  strength  good, 

fair  conditions.  reliable  measurement. 


1 


2 

3 


4 


Observations  slightly  under  par  due 
to  outside  interference  (e.  g.  some 
clouds,  reduced  visibility). 

Observations  only  poor  due  to 
outside  interference. 


Signal  fair. 


Signal  weak,  results 
poor. 


Only  estimates  possible  (malfunction  Signal  questionable, 
of  instrument,  observation  time  span 
too  short). 


Doubtful  observation,  unable  to 
verify  either  object  or  instrument 
behavior.  Observations  should  be 
considered  only  as  tentative. 


COLUMNS  55  -  63  (CROSS  SECTION-FREQUENCY/  MAGNITUDE) 


The  block  containing  columns  55  through  63  is  a  dual  purpose  block 
where  cross  section  and  frequency,  or  magnitude  and  time  interval  are 
indicated.  In  order  to  specify  cross  section  and  frequency,  a  minus  is 
used  in  column  58.  No  sign  is  used  in  column  58  when  this  block  contains 
magnitude  and  time  interval. 

A.  Cross  section,  given  in  square  meters,  is  listed  in  columns  55 
through  57.  To  indicate  less  than  one  square  meter  cross  section, 
use  appropriate  numbers  and  a  minus  in  column  55  thus  in  effect 
putting  a  decimal  point  before  column  55.  For  larger  values  where 
three  digits  would  not  be  sufficient,  use  a  plus  in  column  55  to 
represent  ten  times  the  indicated  value  (adding  a  zero  to  the  value 
listed). 

B.  Frequency  in  megacycles,  is  listed  in  columns  58  through  63  with 
the  decimal  point  understood  to  be  located  between  columns  60  and 
61.  In  rare  cases  it  might  be  desirable  to  increase  the  range  of 
frequency  given  either  side  of  the  decimal  point.  To  do  this,  use 
a  minus  in  column  63  to  move  the  point  one  place  to  the  left,  or  a 
plus  in  column  63  to  move  the  point  one  place  to  the  right. 


Observation  Card  (Part  2  of  3) 
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Observation 


COLUMN  70  (EQUINOX) 


Column  70  contains  year  of  Equinox  as  specified  by  the  following: 


0  =  year  of  date 

1  =  1900 

2  =  1920 

3  r  1950 

4  =  1975 

5  =  2000 

6  =  1850 

7  =  1855 

8  =  1875 

9  =  1960 


Observation  Card  (Part  3  of  3) 
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Field 

Cols. 

i 

1  -  8 

70ASCHTP 

2 

9 

11,8,2  punched 

3 

10-80 

Blank 

First  Card  of  Schedule  Tape  Input  Deck 
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Field 

Cols. 

1 

1  -  16 

Blank 

2 

17  -  19 

Job 

3 

20-24 

Blank 

4 

25  -  40 

Comments 

5 

41  -  80 

Blank 

First  Card  of  Each  Job  Deck 


JOB  Card 
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REM 


2  3  4 


5 


Field 

Cols. 

i 

1  -  16 

Blank 

2 

17  -  19 

REM 

3 

20-24 

Blank 

4 

25  -  40 

Comments 

5 

41  -  80 

Blank 

Optional  Comment  Card 


REM  Card 
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Field  Cols. 


9-16 


17  -  72 
73  -  80 


SPSJQBAA,  Left  Justified 

Program  ID,  Left  Justified 

Input  Option  ) 

>  See  Option  Table 
Output  Option  / 

Comments 

Blank 


Used  with  Schedule  Tape  Mode  Programs 
See  Operating  Summary  Table  for  List  of  SPSJOB  Cards 


SPSJOB  Card 
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END  CASE 


Field 

Cols. 

1 

1  -  8 

END  A  CASE 

2 

9 

11,8,2  Punched 

3 

10  -  80 

Blank 

RUN 


Wolf  Research  and  Development  Corporation 


« 

Field  Cols. 

1  1-16  Blank 

2  17-19  RUN 

3  20  -  24  Blank 

4  25  -  32  Program  ID,  8  Characters  or  Less  -  next  field 

may  follow  directly 

5  33  -  37  ,  DATA  if  Data  Follows 

6  38  -  80  Blank 

Used  to  Run  Manual  Schedule  Tape  Mode  Programs 
See  Operating  Summary  Table  for  List  of  RUN  Cards 

RUN  Card 
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Field  Cols. 

1  1  -  1 6  Blank 

2  17-23  ENDDATA 

3  24  -  80  Blank 


Required  if  RUN  Card  Used 


END  DATA  Card 
3-4-7 


Field  Cols. 

1  1-8  ENDOFJOB 

2  9  11,8,2  Punched 

3  10  -  80  . Blank 


Required  to  Terminate  Each  Job  Deck 


END  OF  JOB  Card 
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Schedule  END 


Field 

Cols. 

i 

1  -  8 

ENDS  CUED 

2 

9 

11,8, 2  punched 

3 

10-80 

Blank 

Last  Card  of  Schedule  Tape  Input  Deck 


Schedule  Tape  END  Card 
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Assign  Deck 


l_ 

< 

< 

< 

<3 

3 

ca 

CO 

UJ 

3 

3 

3 

3 

UJ 

H* 

Z 

O 

o 

O 

3 

h* 

H 

1— 

3 

o 

3 

1- 

DC 

z 

»v 

(J 

3 

< 

< 

< 

Q1 

< 

3 

3 

3 

3 

3 

3 

o 

3 

3 

3 

3 

1— 

o 

«— , 

<— i 

i 

3 

3 

3 

3 

(3 

Q 

o 

a 

o 

Q 

< 

z 

Z 

Z 

z 

3 

3 

3 

1— < 

3 

3 

3 

►— < 

i—i 

►— i 

3 

Q. 

a 

CL 

t— 

h— 

h— 

o 

QC 

DC 

z 

to 

3 

3 

3 

z 

DC 

Q1 

z 

3 

Cl 

a 

CL 

< 

< 

< 

1— t 

< 

X) 

co 

*o 

•— 

3 

O' 

z 

Z 

O 

z 

O 

o 

o 

< 

< 

< 

to 

►— < 

< 

»- 

H 

h- 

3 

to 

u 

u 

<3 

u_ 

Ll 

u 

< 

13 

Z  Z  Z 

3 

3 

3 

O 

O 

o 

3 

Z 

3  <  <  < 

> 

> 

> 

3 

ao  co  co 

X 

X 

X 

_  lU 

V)  -I 
LlI  3 
CL  Z 


y  Z  Z  3  3  i 
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IOPS  AND  PROC 


10 PS  AND  PROC 

ERROR  PROCEDURES  AND  COMMENTS 


Irrecoverable  Errors: 

1)  IRRECOV  ERROR 

2)  PROGRAM  ERR  PROC 

(See  PROC  ERRORS  Table) 

3)  PROGRAM  ERR  IOPS 

(See  IOPS  ERRORS  Table) 

Irrecoverable  errors  comments  are  accompanied  by  a  typeout  of  the  contents 
of  the  A  register  and  Q  register: 

A  REG  = 

Q  REG  = 

The  program  will  then  jump  to  location  3 

* 

Recoverable  Errors: 

1)  PARSPROC  ERR 

Sprocket  or  parity  error 

2)  SI ,  S2  ERR 

Start  or  end  block  sentinal  error 

3)  RING  TAPEXX 

No  write  ring  on  unit  XX 

4)  LOCAL  TAPEXX 

Tape  unit  XX  not  available 

5)  NO  TAPE  XX 

Rewind  issued  -  tape  not  available 

Recoverable  errors  are  accompanied  by  the  STOP-GO  option,  wherein  the 
operator  may  retry  the  job  by  typing  GO  or  may  type  STOP  to  effect  a  jump 
to  location  3.* 

*  Location  3  will  generally  cause  the.  typeout  of  the  Flexo  comment: 
SUBROUTINE  ERROR  EXIT  FROM  OCTAL  XXXXX,  LOAD 
COMPACT  INTO  UPPER  CORE  AND  TAKE  DUMP. 

Following  the  message,  a  stop  or  go  loop  controls  the  console  such  that  if 
STOP  is  typed  the  message  will  be  repeated.  Typing  GO  returns  control 
to  the  executive  program  terminating  the  job.  If  possible,  a  dump  should 
always  be  taken. 
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IOPS  Errors 

Wolf  R«seorch  and  Development  Corporation 

IOPS  ERRORS 

A  REG 

Q  REG 

MEANING 

I/I 

Unit 

TI5  or  T23 

Attempt  to  use  a  tape  which  has  not  been 
defined  in  the  IOUNITS  statement 

2/1 

Unit 

TI5  or  T23 

Attempt  to  read  a  tape  described  in 
the  IOUNITS  statement  as  "Write 

Only". 

3/1 

Unit 

TI5  or  T23 

Attempt  to  write  on  a  tape  described 
in  the  IOUNITS  as  "Read 

Only".  ' 

4/1 

Attempt  to  read  from  a  binary  tape 
more  words  than  there  are  in  the 
record. 

5/1 

The  checksum  of  the  blocks  after 
reading  does  not  equal  the  checksum 
written  with  the  block.  This  is 
applicable  to  binary  tape  only. 

6/1 

Attempt  to  store,  for  printing,more 
than  120  printable  characters  for  a 
given  line. 

7/1 

Attempt  to  read  from  a  binary  tape 
which  is  not  in  the  correct  format. 

8/1 

The  program  was  run  even  though  an 
error  occurred  at  compilation  time. 

9/1 

Probably  machine  error;  or  the 
program  has  destroyed  some  IOPS 
coding  (2GNC). 

10/1 

More  characters  are  requested  from 
a  card  than  were  described  in  the 
record  size  parameter  in  the 

IOUNITS  statement. 
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M/I 

Same  as  9/1 .  (BIWTR) 

12/1 

Last  character 
processed  T5 

Illegal  character  or  illegal 
exponent  field  in  floating  to 
floating  (E)  input  conversation. 

13/1 

Last  character 
processed  T5 

Illegal  character  or  illegal 
exponent  field  in  fixed  decimal 
to  floating  (F)  input  conversion. 

14/1 

Last  character 
processed  T5 

Illegal  character  in  fixed  decimal 
to  integer  (D)  input  conversion. 

15/1 

Last  character 
processed  T5 

Illegal  character  or  exponent  field 
in  integer  to  integer  (1)  input 
conversion. 

16/1 

Rewind  order  to  a  unit  defined  as 
paper  tape. 
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PROC  ERRORS 


A  REG  = 

Q  REG  = 

Meaning 

Zeros 

Location  of  macro-instruc¬ 
tion  in  left  address 

List  ful 1 

Location  of 
macro-instruc¬ 
tion  being  checked 
in  left  address; 

1/1 T47  (D/1) 

Normal  exit  of  check 
macro-instruction  in 
left  address 

Not  in  list 

Location  of 
macro-instruction 
being  checked  in 
left  address;  1/1  T46 
(D/2) 

Normal  exit  of  check 
macro-instruction  in 
left  address 

Checking  non- magnetic 
tape  order  with  magnetic 
tape  check  macro¬ 
instruction 

Location  of 
macro-instruction 
being  checked  in 
left  address;  I/IT 45 
(D/4) 

Normal  exit  of  check 
macro-instruction  in 
left  address 

Checking  too  much 
(B=  NBP  of  original 
order.) 

Location  of 
macro-instruction 
being  checked  in 
left  address;  I/IT43 
(D/16) 

Normal  exit  of  check 
macro-instruction  in 
left  address 

Checking  out  of 
sequence 

Unit  #T23;  1/1 T41 
(D/64) 

Location  of  macro-  instruc¬ 
tion  being  checked  in  left 
address 

Write  or  read  only 

4-2-4 


Wolf  Reseorch  and  Development  Corporation 


SPSJOB  Option  Table 


SPSJOB  OPTION  TABLE 


PSR: 

SPSJOB 

PSR  (1)  (0) 

(1): 

Col. 17 
0 

=  Parameter  Cards 

(O): 

Col.  18 
0 

1 

=  Print  (D.  S.  1)  and  punch  paper  tape  (D.  S.4) 

=  Print  only  (D.  S.  1) 

RESPLT: 

SPSJOB 

RESPLT  (1)  (O) 

0): 

Col.  17 

0 

1 

2 

3 

4 

5 

=  Observation  Cards 
=  Observation  and  Element  Cards 
=  Observation  and  Element  Number  Cards 
=  Observation  and  Sensor  Cards 
=  Observation,  Element,  and  Sensor  Cards 
=  Observation,  Element  Number,  and  Sensor  Cards 

(O): 

:  Col.  18 
0 

=  Print  (D.S.I)  and  punch  cards  (D.  S.2) 
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SPS  Operating  Summary 


INDEX 

1 

Description: 
Section  1 
Program  12 
Input/Output: 
Section  5 
Program  1 2 

Description: 
Section  1 
Program  16 
Input/Output: 
Section  5 
Program  16 

Description: 
Section  1 

Program  5 

Input/Output 

Section  5 

Program  5 

OUTPUT 

Contents 

Contents  of 
Acquistion 

File 

TTYAIN 

Tape 

Containing 

Standard 

Observation 

Data 

Position 

and 

Velocity 

Components 

of  a  Sat.  at 

Specified 

Intervals 

Form 

<0)o  = 

Print 

(DS1) 

INTERIM  1 

I 

0 

j— 

_ 

None 

None 

©x= 

Scratch 

Used  for 

Data  Input 

INPUT 

Special 

Tapes 

< 

UJ 

GO 

GO 

0 

o.  8. 
a>2 
u 

3 

None 

Input  Deck  (SPS) 

1)  JOB 

2)  RUN  ASUMB2 

3)  ENDOFJOB® 

1)  JOB 

2)  RUN  BMEWSPTB 

3)  ENDOFJOB@ 

1)  JOB 

2)  RUN  CCOEB2,  DATA 

3)  Standard  Element  Set 

4)  Request  Card(s) 

_5)  Blank  Card 

6)  Blank  Card 

7)  ENDDATA 

8)  ENDOFJOB@ 

Tape 

Setup 

■ 

GO  GO  —  GO  0  O 

<r-®@©© 

X  GO  —  GO  0 
@-®@© 

PROGRAM 

Name 

ASUM 

BMEWSPT 

CCOE* 
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SYMBOL  KEY:  I  -  Input,  O*  Output,  S®  Soecial,  X*  Scratch,  (Q)=  Write  Ring,  /fX  -No  Write  Ring,  @  =11,8,2  Punch 
*  =  TELTYP  Program  May  Follow,  [=  Repeat  if  Necessary,  (  )  =  Optional 
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INDEX 

Description: 
Section  1 
Program  14 
Input/Output: 
Section  5 
Program  14 

Description: 
Section  1 
Program  4 
Input/Output: 
Section  5 
Program  4 

Description 
Section  1 
Program  8 
Input/Output: 
Section  5 
Program  8 

OUTPUT 

Contents 

Contents  of 
Information 
File  with 
Optional 

Box  Score 

Vector 

Coordinates 

for 

Lockheed 

Alphanumeric 
Card  Data 
Transferred  to 
Tape,  with 
Sentinals 
Required 
by  TELTYP 

Form 

!l 

> 

J)  <u 

li  H 

O  4.-  O  -y  J;  ^ 

©IS  ©lie 

ll 

0 

©IS 

INTERIM  i 

Tape  Usage 

®x  = 

Scratch 

Used  for 

Data  Input 

®X  = 

Scratch 

Used  For 

Data  Input 

®x  = 

Scratch 

Used  for 

Data  Input 

INPUT 

Special 

Tapes 

n 

on  < 

None 

None 

Input  Deck  (SPS) 

1)  JOB 

2)  RUN  ISUMB2,  DATA 

3)  (ALL)  Control  Card 

4)  (BOX)  Control  Card 

5)  (NNN)  (Sat.  No. ,  Used  in  Absence  of  ALL  Card) 

6)  END  Control  Cord 

7)  ENDDATA 

8)  ENDOFJOB  @ 

1)  JOB 

2)  RUN  LOCVECB2,  DATA 

3)  Request  Card(s)  (500  max.) 

4)  7  Punch  in  Col .  8 

5)  Element  Set(s)  (500  max.) 

6)  Blonk  Card 

7)  ENDDATA 

8)  ENDOFJOB@ 

1)  JOB 

2)  RUN  MAKETAPE,  DATA 

3)  (TELEFORM)  Control  Card 

4)  Cards  to  be  Converted 

5)  FINDATA  Control  Card 

6)  ENDDATA 

7)  ENDOFJOB @ 

Tape 

Setup 

x  i/)  -  ^  O 

><  co  -  y»0 

©-<§>©© 

-  unO  i 

<§>~©0(g)  1 

H 

PROGRAM 

Name 

ISUM 

LOCVfiC 

s 

< 

►— 

LU 

X 

< 
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SYMBOL  KEY:  I  =  Input,  O  «  Output,  S*Soecial,  X  =  Scratch,  (g)  =  Write  Ring,  £±,  =No  Write  Ring,  @  =1 1 , 8, 2  Punch 
*  =  TELTYP  Program  May  Follow,  £=  Repeat  if  Necessary,  (  )  =  Optional 
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SYMBOL  KEY:  I  =  Input,  O  =  Output,  S  =  Soecial,  X  *  Scratch,  (Q)=  Write  Ring,  =  No  Write  Ring,  ©  =  1 1 , 8, 2  Punch 
*  =  TELTYP  Program  May  Follow,  |=  Repeat  if  Necessary,  (  )  -  Optional 
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SYMBOL  KEY:  I  -  Input,  O  -  Output,  S  =  Soecial,  X  *  Scratch,  (N)=  Write  Ring,  /N\  =No  Write  Ring,  @  = ]  1 , 8, 2  Punch 
*=  TELTYP  Program  May  Follow,  Q=  Repeat  if  Necessary,  (  )-  Optional 
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System  Operating  Modes 


SYSTEM  OPERATING  MODES 

f 


The  definition  of  terms  as  used  in  the  descriptions  included  in  the 
Input-Output  section  under  Input  Deck  are  as  follows: 

A.  Schedule  Tape  Mode 

This  term  implies  that  the  program  is  completely  SPS  system 
oriented.  The  assign  deck  listed  in  the  Assign  Table  has  been 
used  to  bind  the  program  to  the  system.  An  SPSJOB  card  must 
be  used  to  call  the  program  from  the  system  library  tape.  All 
elements,  observations,  sensors,  as  well  as  the  parameter 
cards  are  brought  in  by  the  executive  routine  after  consulting 
the  input-output  options  contained  on  the  SPSJOB  card  and  an 
internal  Job  Table.  Only  system  supplied  routines  are  used 
in  the  execution  of  input- output  requirements.  Upon  completion 
the  program  will  exit  to  the  system  location  called  EXEND. 

Toggle  24  must  be  on  and  1-23  off  to  run  under  this  mode. 

B.  Manual  Schedule  Tape  Mode 

The  programs  of  this  type  require  a  RUN  card  to  call  the  pro¬ 
gram  from  the  system  library  tape.  If  data  follows,  it  will  be 
moved  to  logical  tape  zero  (0)  by  the  executive  program.  The 
program  will  read  data  from  this  tape. 

PROC  and  IOPS,  which  are  supplied  at  compilation  time  by  the 
ALTAC  compiler,  are,  with  few  exceptions,  the  input-output 
routines  used.  These  input-output  routines  have  been  modified 
and  are  interruptable  by  the  real-time  devices  available.  Vari¬ 
able  formatting  of  input-output  requests,  as  used  in  FORTRAN 
and  ALTAC,  as  well  as  Macro  capabilities,  have  been  maintained 
as  a  result  of  the  modifications  made. 

The  system  assign  deck  is  not  used  and  the  program  contains  the 
minimum  amount  of  information  required  to  bind  it  to  the  system. 
Upon  completion  of  the  program  a  return  is  made  to  the  location 
called  MANEXIT. 

Toggle  24  must  be  on  and  1-23  off  to  run  under  this  mode. 
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SCHEDULE  TAPE  FORMAT 


1 

70ASCHTP  Cord 

Fi  Her* 

2  , 

JOB  Cord 

REM  Cord 

SPSJOB  Cord 

Doto 

3 

Data 

4 

END  CASE  Card 

Fillers 

5 

Doto 

6 

END  CASE  Cord 

END0FJ0B  Card 

Fi  Hers 

7 

JOB  Cord 

RUN  Cord 

END0FJ0B  Card 

Filters 

8 

JOB  Cord 

RUN  NAME,DATA  Cord 

Data 

9 

Data 

ENDDATA  Cord 

END0FJ0B  Card 

ENDSCHED  Card 

Fillers 

Each  new  job  deck  starts  at  the  beginning 
of  a  block,  to  simplify  interrupt. 


Blocks  2-6  show  the  layout  of  an  SPSJOB 
run  in  Schedule  Tape  Mode. 


Block  7  shows  a  job  run  under  the  Manual 
Schedule  Tape  Mode,  without  data. 


Blocks  8-9  show  a  job  run  under  the  Manual 
Schedule  Tape  Mode,  with  data. 


Fig.  5.  0 
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PSR 


PSR 

(Postion  Situation  Report  (SITRPT)  ) 


INPUT  DECK:  Schedule  Tape  Mode 


INPUT  DATA: 


SPSJOB  card  required  with  the  following 
options  available: 

a)  Input  options  (col.  17) 

0  =  parameter  cards 

b)  Output  option  (col.  18) 

0  =  teletype  output  required 
1  =  inhibit  teletype  output 

1)  SEAI  tape 

2)  First  parameter  card  is  a  request  card 
(P  in  col.  80).  See  layout* 

3)  Up  to  eleven  parameter  cards  (P  in  col.  80) 
which  will  be  treated  as  .comment  cards  for 
Part  I  of  Satellite  Situation  Report. 


OUTPUT:  Logical  tape  11  contains: 

1)  Position  Situation  Report  if  option  zero 
requested. 

2)  Satellite  Situation  Report  if  option  one  requested. 

3)  Both  if  option  two  requested. 

4)  Teletype  output  if  indicated  on  SPSJOB  card. 
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Field 

1 


2 

3 

4 

5 

6 

7 

8 

9 

10 


Cols. 

1 


2-3 

4-5 

6 

9-10 

12-14 

16-19 

23 


24 


80 


Output  Option 

0  Position  situation  Report 

1  Satellite  Situation  Report 

2  Both  Reports 

Hour  at  Which  Report  Supplies  Position 
Minutes  at  Which  Report  Supplies  Position 
Z  Punch 

Day  of  Month  at  Which  Report  Supplies  Position 
First  Three  Letters  of  Month 
First  Three  Letters  of  Month 
Satellite  Situation  Report  Output  Code: 

Blank  or  0  Suppress  Print  of  Debris 
1  Print  All  Satellites 


Position  Situation  Report  Output  Code: 

Blank  or  0  Perigee  and  Apogee  in  statute  miles. 
1  Perigee  and  Apogee  in  Kilometers 


P  Punch 


Request  Card 
PSR 
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REDUCT 


REDUCT 

(Nodal  Crossing  Reduction) 

INPUT  DECK:  Manual  Schedule  Tape  Mode 

INPUT  DATA: 

The  first  card  of  the  input  data  is  an  option 
switch  card  controlling  the  processing  and  the  output. 
This  card  is  followed  by  the  standard  element  sets, 
station  cards  (if  any),  and  observation  cards,  with  each 
group  preceded  by  a  lead  card. 

The  deck  should  be  in  the  following  order: 

1.  Option  Switch  card: 


Col.  i: 


Col.  3: 


Col.  8: 


Col.  9: 


Col.  10 


I 


5 


a  numeric  punch  (1-9)  will  cause 
the  Station  Tape  (logical  7)  to  be 
inhibited. 

a  numeric  punch,  (1)  inhibits  the 
interim  tape  (logical  8),  (Z)  eliminates 
tolerance  limit  tests. 

a  numeric  punch  causes  all  observations 
—to  be  treated  as  unknowns,  reducing 
all  against  the  available  element 
sets. 

a  numeric  punch  modifies  headings, 
spacings,  and  format  length  to  allow 
subsequent  processing  by  TELTYP  to 
obtain  output  for  teletype  transmission, 
a  numeric  punch  eliminates  a  re-  reduction 
of  unknown  obs.  which  have  remained 
untagged  after  a  reduction  against  the 
selected  tolerance  limits.  If  the  re¬ 
reduction  is  not  eliminated,  the  untagged 
obs.  ,,  which  have  been  written  out  on  the 
interim  tape,  are  tested  against  open 
tolerance  limits  (At=99-  0  days,  A  RA= 

15.  0  degrees,  Ah  =  99999-  0  kilometers). 
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Col.  1 1 :  a  numeric  punch  directs  the  program 
to  use  the  perigee  distance  (q  term) 
of  the  element  cards.  If  this  term  is 
not  used3perigee  distance  will  be  com¬ 
puted  by  the  formula:  q  =  a  (1-e). 

2.  Element  lead  card:  a  7  punch  in  col.  8. 

3.  Standard  6  or  7  card  element  sets  (up  to  250). 

4.  Station  lead  card:  a  9  punch  in  col.  8. 

5.  Standard  station  cards  (up  to  750).* 

6.  Observation  lead  card:  and  8  punch  in  col.  8  with 

jjc  >;< 

the  tolerance  limit  key  punched  in  col.  7: 


Tolerance  Table 

Col.  7 

At,  in 
days 

A  RA,  in 
degs . 

AH,  in 
kms. 

0  or  blank 

.  002 

20.  0 

200 

i 

1.  0 

5.  0 

500 

2 

.  003 

360.  0 

10000 

3 

.  002 

360.  0 

10000 

4 

.  001 

360.  0 

10000 

5 

.  003 

5.  0 

300 

6 

.05 

2.  5 

200 

7.  Observation  cards  (any  number). 

8.  A  blank  card  to  terminate  the  preceding  group, 
group  of  observation  cards. 

9.  End  of  input  card:  a  9  punch  in  col.  79. 

*  The  Station  Tape  (logical  7)  may  be  used  in  place  of,  or  in 
addition  to,  the  card  groups  4  and  5. 

**  Observation  lead  cards  (any  number)  may  be  inserted  to  vary 
the  tolerance  limits  applied  to  the  reduction  of  the  following 
observation  cards. 
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OUTPUT: 

Output  begins  with  the  satellite  inventory.  Seven  groups,  composed 
of  satellite  number  and  element  number,  are  printed  per  line. 

The  next  output  is  the  satellite  number  (first  line),  selected  elements 
(two  lines),  and  the  tolerance  limits  used  in  the  observation  output  following 
(one  line). 

Observation  output  will  occur  in  one  of  three  formats,  depending  on 
which  part  of  the  program  has  done  the  reduction,  as  in  the  following  table: 

General  Reduction  Output: 

ID  =  16  digit  observation  identification  number  comprised  of  the 

satellite  number,  the  last  digit  of  year  of  observation,  month 
day,  hour,  minute,  seconds,  and  hundreths  of  seconds. 

N  =  Epoch  revolution  number 

U  =  Argument  of  latitude  of  satellite  in  orbit  plane 
T  SUB  N  =■  Computed  time  of  nodal  crossing 
DELTA  T  =  Time  residual  in  days  (difference  between  predicted  and  observed) 
PHI  S  =  Computed  latitude  of  subsatellite  point 
L  S  =  Longitude  of  sub  satellite  point 
RA  N  =  Right  ascension  of  ascending  node  in  degrees 
DEL  RA  =  Right  ascension  residual  (difference  between  predicted  and  observed) 
H(KM)  =  Height  in  kilometers 

DEL  H  =  Height  residual  (difference  between  predicted  and  observed) 

TYPE  =  YIS  for  visual  observations 
RDR  for  radar  observations 
B-N  for  3aker-Nunn  observations 


ELEM  =  Element  number 
STA  =  Station  number 
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Doppler  Reduction: 

ID  =  Observation  identification 
N  =  Epoch  revolution  number 
T  SUB  N  =  Computed  time  of  nodal  crossing 
DELTA  T  =  Time  residual  in  days  (difference  between  predicted  and  observed) 
D  =  Arc  distance  in  nautical  miles  from  station  to  subsatellite  point. 

H  =  Elevation,  in  degrees 
S  =  Slant  range,  in  kilometers 
ELEM  =  Element  number 
STA  =  Station  number 


Direction  Finder  Pieduction: 

ID  =  Observation  identification 
N  =  Epoch  revolution  number 
T  SUB  N  -  Computed  time  of  nodal  crossing 
DELTA  T  =  Time  residual  in  days  (difference  between  predicted  and  observed) 
H  =  Elevation,  in  degrees 
S  =  Slant  range,  in  kilometers 
H(KM)  =  Object  height,  in  kilometers 
ELEM  =  Element  number 
STA  =  Station  number 


If  the  output  is  to  be  processed  by  TELTYP  for  teletype  transmission, a 
modified  version  of  the  above  output  will  be  printed.  In  general,  each  line, 
as  described  above,  Will  be  broken  into  two  lines  of  output.  Each  line  will  be 
followed  by  an  asterisk  (*  ),  and  the  abreviation,  DOP,  for  doppler  observations, 
or  DF,  for  direct  finder  observations  will  follow  the  station  number. 
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51 
51 
51 
51 
51 
51 
60 
60 
60 
60 
60 
60 
73 
73 
73 
73 
73 
73 
77 
77 
77 
77 
77 
7  7 


19 

19 

19 

19 

19 

19 

19 

19 

19 

19 

19 

19 

6 

6 

6 

6 

6 

6 

4 

4 

4 

4 

4 

4 


JOB 

RUN 

11 

7 

160  IOTA  3 
21961 

3 

4 

5-0. 

6 

1  60  XI  1 
21961 

3  0.07820488 

4-1.8607016E-08 


REDUCTION  TEST 
REDUCT B2  * DATA 

TOGGLE  CARD 


2300. 

48.10885429 

33.15050268 

-3.08994973 


0.01095429 


1 


5*3245 170E-06 -5 .1259364E-06 
0.082U5393  5 • 034 57 1 5E-009 


211*88786888 
2  *.9747085  0-0* 

0. 


47.19999981 
48. 10885429 
1*23742932 


1390. 

50.94619608 
11.63639760 
-3.35409367 
-2 .108  3 8  26 E-05 


0.11134295  49.97599983 

1  50.94619608 

355.09534836  1.07672971 

2.78489476-0. 
1.7505843E-05-0. 


5-0. 

6 

161  BETA  3*  200.  0.00638922  64.88655853 

21961  47 • 55804205  1961  47.55804205 

3  0.06244039  143.76211357  60.99729776  1.03565089 

4-7. 45752 13E-07  -3.65672696  -0.42809739-0. 

5  0.  -1.6202050 E-03-1.8967934E -04-0. 


6  -0. 

11961  GAMMA  3 
21961 

3  0.06208724 

4-2.  12  267  34E-06 


-0.  -0  -0.  -0.  0  0 

90.  0.00817470  65.01097775 

48.61976957  1961  48.6^976957 

166.09534454  20.37677312  1.02988344 

-3.68851939  -0.47019580-0. 

5-6 • 1808457 E-09-4.69530 7 0E-03-5 .98 53653E -04-0. 

6  1.00000000  360.00001  -0  -0.  -0.  0  0 

9 

5  00  3901  LAREDO  TEXAS  143 

01 3501FARNHAM  ENGLAND  401 

9  000201  BILLERICA  MASS  121 

510G30000TRINI DAD  159 


1950 

1100 

670 

2135 


0039+276191+0993844 
0135+512139+0008153 
DO  02+425  56 1-2886997 
0300+107 330+06 16 00 U 
3 

-5  82  103C00 1022 10 1582700029000016800000189  80 
410002010208  22150000  0  C 

-  2 103U 00 102 2 10 1592 9 000307000 15 40000 2 185 20 

-  2103000102210159290003070001540000018520 
0  42200390102231508495001070001403000008960 
060  10135010220194245400397000-539060 

060  10135010220194245400397000-539060 
07 3220039U 102231 50936 000107000 14030000 113 80 
0732200390102231638410000  2555000018750 

07 72200390 1022 3 165 5 19000 10400 01402000 008 5 40 

58 

051  100690102230244223007158003600000 

2103000102210159290003070001540000018520 
051  100690102230244223007158003600000 
-51  100690102230244223007158003600000 


MSG 

1 

1877 

-27-150-24 

*00 

06878 

35  -80-66 

MSG 

MSG 

2 

1877 

-21-130-24 

315 

57  15-  8 

1401 

-16  -25-19 

010 

14C 1 

-16  -25-19 

313 

24  -33-  6 

314 

30  -16-  6 

188 

37  -4-  4 

2373 

-16  -4-19 

MSG 

2 

1877 

-21-130-24 

0  30 

2373 

-16  -4-19 

2373 

-16  -4-19 

ENDOFJOBR 


ENDDATA 
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BB89BBBB6B8BBBBB 

PM  MISSING  SO  PA  USED  FOR  SAT  60  t-Lf*  T9 


satellite  INVENTORY  follows.* 

51  19/  60  1 9/  7  J  6 /  77  4/ 

05810221  01582700  NO  ELEMENTS  IN  sYsTEM(ll. 


* 

^cc  * 


DO  S  FOLLOW* 

U  NK*  *********  * 

05110206  00221500 


6878 


0* 


2.169  39.00631865  0. 00538* 


1256  . 
06010208 
828, 
0731 0206 
4179, 

07710208 

3  2 1  6  , 


21  .81 
00221500 
27,84 
00221500 
-33.18 
00221500 
-24-.  20 


3099.  i9 i 


2%  OOp* 


1267  39.00684022  0.02643* 

2022.  1 9 ,  2£  DOp* 

63  38.99523414  G.0Q552* 

7425.  6.  2%  OOP* 

-65  30.99127295  0-02301* 

5885,  4.  2$  DOp* 


UNK*********** 

M* 

05H0221 

01592900 

2348  225.00  52.03144556 

-o.oi6oa* 

-31,301 

320,43 

256,79  -94.19  19322,3 

1.7807,4  RDR 

19. 

300 

*s 

06010221 

01592900 

1404  222 , /2  52, 03242214 

-0.00864*  ' 

-31  .301 

320.43 

290.35  -77.6i  19322.3 

17408.9  pDR 

19. 

300 

4 

0731 0221 

01592900 

272  324.99  52*026694^ 

-0.02319* 

-31 .301 

320,43 

157,62  30.31  19322,3 

1  9  o57 , 3  RDR 

6. 

300 

* 

07710221 

01592900 

145  325,03  52.Q2714149 

0.00002* 

-31.301 

320,43 

157.52  4.05  19322.3 

39117,7  RdR 

4. 

300 

4 

LINK*********** 

1877  -  M* 

05110221 

01592900 

2348  180.54  52.04l403o3 

-0 . 00605* 

-n . 394 

303.74 

3  0  4  •  0 1  -76.97  1116*7 

-421.4  RDR 

1 9  • 

300 

4 

06010221 

01592900 

1404  100.51  52.04354025 

0.00248* 

-0.394 

3  0  3 . 7  4 

304 , 04  -63.92  lll6.7 

-1093.3  RDR 

19. 

300 

4 

07310221 

01592900 

272  359,56  52,0207218.6 

-0.02916* 

-0.394 

303,74 

124,56  -2.75  1H6.7 

871.0  RDR 

6. 

300 

4 

07710221 

01592900 

145  359,56  52,02126079 

-0.00586* 

"0 .394 

3o3*74 

124*56  -28*92  lll6*7 

923*7  RDR 

4. 

300 

4 

00410223 

15084950 

NO  ELEMENTS  IN  SYsTCM(l). 

39* 
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60  ^ 

1390  50,94620  0.070205  -0.186-007  0.000+000  1.2J164 

11.636  -3.354  -0.0000  355. q95  2.785  0.0000  112.62 


0,00200  20.00000  200.00000+ 


06010220 

19424540 

I4OI 

81. 38 

5l «806^858^ 

-0.00016* 

49,214 

359 . 07 

8.50 

-0.25 

1176.3 

0.0  vis 

19. 

0601 0220 

1 9  4  2  4-5  4  0 

1401 

81.38 

51.80823582 

"0 , 00016* 

49.214 

359,07 

,.39 

-0,25 

1.176 , 3 

0.0  >'IS 

19. 

7  3* 

200  47.55804-  0.062440  -  0. 746-  006  0  .  00  0+000  1.04231 

143.762  -3.657  -0.0016  60.997  -0.428  -0.0002  39.91 


* 


0.00200  20. 


07310223  15093600 
19.898  267.15 

07310223  163841 0  0 
22,315  243,44 


00000  200. 00000* 

313  157.92  54,60451877 

117.58  -0-33  305.6 

314  155-21  54.66685240 

117,53  -0.16  270.1 


0.00024* 

38.2  rDr 
0.00030* 
4,2  RDR 


6. 

6 

ft 


77* 

90  48.61977  0.062087  -0.212-005  -0.618-00B  1.03837 

166,095  -3,669  -0.0047  20.377  -0.470  -0.0006  89.41 

* 

0,00200  20.00000  200.00000+ 

07710223  l6553.9(jo  188  155,89  54.67Q49040  0.00037* 

21,739  265,6 6  143.54  -0.04  208.0  -7.6  RoR  4. 

END  Of  PON  ********** 

♦ 


0,11134* 

49.98* 

135  * 
135  * 


0. 00639+ 

64.89* 

39  * 

39  * 


0.00817* 

65,01+ 


39  * 
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(Radar  Orbit  Computation) 

INPUT  DECK:  Manual  Schedule  Tape  Mode 

INPUT  DATA:  Two  options  for  input  are  accepted  by  the  program:  i)  radar 
observations,  2)  geocentric  rectangular  coordinates  and 
velocities. 

Option  1: 

1.  Request  Card: 

Col.  1-3  Number  (odd)  pf 

observation  cards  to 
be  read,  from  3  to  999* 

6-17  Alphanumeric  satellite 

name  or  identification, 
for  output. 

18-35  Date  of  computation 

41  1  punch  request  ele¬ 
ment  cards  as  output. 

42  1  punch  prints  x,  y,  zf 
x,  y,  z  for  the  mean  of 
the  observations. 

72-80  Are  blank 

2.  Standard  Station  Card 

3.  Standard  Observation  Cards,  in  order  of 
increasing  time,  (any  odd  number  from 
3  to  999) 

4.  9  punch  in  col.  79:  card  used  to  end 
data  deck. 

Option  2: 

1.  Request  card: 


6-17 

Alphanumeric  satellite 

name  or  identification, 

for  output. 

18-35 

Date  of  computation 

41 

1  punch  requests  ele¬ 

ment  cards  as  output 

72-80 

Must  be  blank 
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OUTPUT: 


c 


2.  Rectangular  Coordinate  Card: 


Col.  1-14* 

x,  in  km. 

15-28* 

y,  in  km. 

29-42* 

z,  in  km. 

43-46 

Year  of  epoch 

Velocity  Component  Card: 

Col.  1-14* 

x,  in  km/sec. 

15-28* 

y,  in  km/sec. 

29-42* 

z,  in  km/sec. 

43-56*  Day  of  year  of  obser¬ 
vation  of  coordinates 
4.  9  punch  in  col.  79:  card  used  to  end 

data  deck.  * 


*  The  field  must  have  a  decimal  punch. 


The  output  consists  of  the  normal  Radar  Orbit  Computation 
plus  two  options  as  selectedby  the  input  request  card. 

The  Radar  Orbit  Computation  is  comprised  of  headings 
(program  title,  station  name,  alphanumeric  satellite  identification, 
and  the  date)  and  output.  Each  datum  of  output  follows  its  label: 
semi-major  axis  in  km.  ,  earth  radii,  right  ascension  of  ascending 
node  in  degrees,  radius  vector  in  km.  ,  eccentricity  squared,  nodal 
period  in  days  and  minutes,  argument  of  perigee  in  degrees,  velocity 
in  km. /sec.  ,  perigee  distance  in  km.  and  in  earth  radii,  time  of  last 
perigee  pass  in  days,  inclination  in  degrees,  apogee  in  km.  and  earth 
radii,  and  the  time  of  the  last  nodal  crossing  in  days. 

Output  Option  A,  which  is  possible  only  with  input  option  (1), 
produces  a  printing  of  the  geocentric  rectangular  coordinates  x,  y,  z 
(headed  XX  =  ,  YY  =  ,  ZZ  =)  and  the  velocity  components  (headed 
XDER  =  ,  YDER  =  ,  ZDER  =).  The  time  of  the  observation  is  given 
under  the  heading  TIME  =. 
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Output  Option  B  produces  punched  cards  in  the  standard 
6  card  element  set  format.  The  data  punched  are  the  satellite 
number,  element  card  number,  satellite  name,  eccentricity, 
inclination,  year  of  epoch,  time  of  epoch,  nodal  period  at  epoch, 
right  ascension,  argument  of  perigee,  and  perigee  distance.  All 
other  fields  of  the  standard  set  are  left  blank. 

If  teletype  transmission  is  desired,  the  program  TELTYP 
may  be  used. 
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Wolf  Research  and  Development  Corporation 


LOCVEC 


INPUT  DECK: 
INPUT  DATA: 


OUTPUT: 


LOCVEC 

(Vector  Coordinates  for  Lockheed) 


Manual  Schedule  Tape  Mode 


(1) 


(2) 

(3) 

(4) 


Request  cards  -  as  many  as  required  up  to  500. 

cols.  1-3  SPADATS  sat.  no. 

col.  9  a)  1st  digit  of  STC  sat.  no. 

b)  9  if  SPADATS  sat.  no.  used 
cols.  10-12  Sat.  no. 

cols.  13-20  Name  of  sat.  (alphanumeric) 

cols.  21-24  Country  of  origin 

Col.  8  -  a  numeric  punch  (1-9)  which  signals  the  end 
of  the  request  deck. 

Standard  six  or  seven  card  element  sets.  Up  to  500 
sets  can  be  read  into  core. 

One  blank  card  terminates  the  element  card  read  in 
proces  s . 


Logical  tape  11  contains  x,  y,  z  in  feet  and  x,  y,  z,  in 
ft/  sec.  to  be  printed.  Five -channel  paper  tape  is  available 
for  teletype  transmission  to  the  CDC  1604  computer  at 
Sunnyvale  Tracking  Center. 
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CCOE 


( Cartesian 

INPUT  DECK: 
INPUT  DATA; 


OUTPUT: 


CCOE 

Coordinates  from  Orbital  Elements) 


Manual  Schedule  Tape  Mode. 

(1)  Set  of  Standard  Elements  (6  or  7  cards). 

(2)  Request  cards  -  as  many  as  required: 

Cols.  1  -  10:  Start  time  (days  of  year). 

li  -  20;  Time  increment  (days  of  year)* 

21  -  30:  End  time  (days  of  year). 

31:  Blank,  output  in  kilometers  per  sec. 
1,  output  in  earth  radii  per  min. 

(3)  One  blank  card 

(4)  The  above  may  be  repeated  any  number  of  times. 

To  terminate  the  program  a  second  blank  card 
must  be  used. 

Logical  tape  11  contains  the  position  and  velocity 
components  with  the  output  in  kilometers  and  kilo¬ 
meters  per  second  or  in  earth  radii  and  earth  radii 
per  minute.  The  information  is  in  order  of  increas¬ 
ing  time  (in  days)  for  each  time  step  during  the  range 
requested. 
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r> 


Columns: 

1 

-  10 

Begin  Time,  In  Days, 

DDDDD.  DDDDD 

11 

-  20 

Step  Time,  In  Days, 

DD.  DDDDDDDD 

21 

-  30 

End  Time,  In  Days, 

DDDDD.  DDDDD 

31  Blank  Means  Output  In  Kilometers  Per  Sec. 

1  Means  Output  In  Earth  Radii  Per  Min. 


Note:  Decimal  points  may  be  punched  anywhere  in  each  of 

the  first  three  fields. 
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INPUT  DECK:  Schedule  Tape  Mode 

An  SPSJOB  card  is  required.  The  following  options 
of  data  input  and  output  are  specified  in  columns  17 
and  18: 

a)  Input  option,  column  17: 


Option 

Observation  Data 

Element  Data 

.. 

Sensor  Data 

0 

Observation  Cards 

SEAI  Tape 

SEAI  Tape 

1 

Observation  Cards 

Element  Cards 

SEAI  Tape 

2 

Observation  Cards 

Element 

Number  Cards 

SEAI  Tape 

3 

Observation  Cards 

SEAI  T  ape 

Sensor  Cards 

4 

Observation  Cards 

Element  Cards 

Sensor  Cards 

5 

Observation  Cards 

Element 
Number  Cards 

Sensor  Cards 

b)  Output  option,  column  18: 

0  =  print  (DS  1)  and  punch  cards  (DS.  2) 


INPUT  DATA:  Element  data  and  sensor  or  station  data  may  come 

either  from  standard  cards  or  from  the  SEAI  Tape 
depending  on  the  input  options  chosen.  The  number  of 
input  cards  is  limited  by  the  size  of  the  O,  E  and  S 
blocks  of  the  system. 

Observational  data  always  originates  from  standard 
observation  cards,  which  have  been  ordered  by  satellite 
number  and  contain  an  association  indicator  in  col.  80. 

If  untagged  observations  (a  zero  sat.  no.  )  are  to  be 
reduced,  the  first  of  the  untagged  observations  must 
contain  the  satellite  number  of  the  element  set  against 
which  the  observations  are  to  be  reduced.  If  this  pro¬ 
cedure  is  inconvenient,  a  card  may  be  inserted  preceding 
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OUTPUT: 


the  untagged  observations.  This  card  must  contain  the 
satellite  number  to  be  used  and  an  association  indicator 
in  col.  80.  In  this  case,  the  sensor  number  must  be 
blank. 

The  association  indicator  is  necessary  on  all 
observation  cards  to  indicate  whether  the  observation  is 
an  angles  only  or  a  radar  observation. 


Association 

Status 

Observation 

Kind 

Association 

Category 

1 

Radar 

Associated 

Z 

Radar 

Doubtful 

3 

Radar 

Unassociated 

4 

Angles  Only 

Associated 

5 

Angles  Only 

Doubtful 

6 

Angles  only 

Unas  sociated 

9 

Radar 

Special  Unassoc. 

Two  types  of  output  are  provided:  1)  the  printed 
output  of  the  reduced  observations,  and  2)  the  punched 
card  output  of  the  reductions,,  with  pen  commands, 
required  as  input  to  the  EAI  Data  Plotter. 

1)  The  printed  output  consists  of  the  reduced  obser¬ 
vations,  sorted  by  revolution  number,  for  a 
given  satellite.  Headings  are  printed  for  the  data 
columns  which  contain:  the  satellite  number,  the 
observation  number,  the  revolution  number,  the 
time  (minutes/ 100)  since  epoch,  the  vector 
magnitude  in  kilometers,  the  revolution  number 
(N/1000)  since  epoch,  the  element  number,  the 
association  indicator,  and  the  station  number. 

2)  The  punched  card  output  of  the  reduction  is  used 
as  input  on  an  EAI  Data  Plotter  which  is  assumed 
to  have  line  plotting  capabilities.  The  required 
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RES PL T 


commands  are  punched  in  column  55.  The  first 
card  of  output  will  stop  the  plotter  (7  in  col.  55). 

This  is  done  to  enable  the  operator  to  change 
graph  paper  and  position  the  origin.  The  cards 
which  draw  the  axes  follow  the  stop  command  (six 
cards).  The  graph  labeling  cards  are  next  and 
cause  the  plotter  to  draw  the  characters  S,  E,  R 
and  T.  These  characters  are  followed  by  the  satel¬ 
lite  number,  element  number,  epoch  revolution 
number  and  the  epoch  time  in  days.  A  stop  command 
follows  the  above  data  (7  in  col.  55).  (The  deck  may 
be  broken  at  this  point  if  the  axes  and  labeling  is 
not  desired).  The  data  cards  containing  the  infor¬ 
mation  to  be  plotted  follow  the  stop  command  and 
continue  until  the  next  stop  command  is  reached. 

Two  types  of  plots  can  be  obtained  from  the  data 
cards:  1)  the  time  difference  versus  the  revolution, 

and  2)  the  vector  magnitude  versus  the  revolution. 
Two  IBM  523  board  wiring  diagrams  have  been 
supplied  in  Section  1  under  the  program  description. 
The  scaling  is  such  that  both  plots  can  be  obtained 
on  the  same  piece  of  graph  paper.  To  achieve  this 
result,  the  IBM  523  board  must  be  changed  when  the 
final  stop  command  is  executed.  The  deck  should  be 
broken  as  described  above  and  the  data  cards 
reprocessed.  It  is  recommended  that  a  symbol  pen 
or  color  change  be  used  in  order  to  distinguish  the 
two  plots* 

The  graph  scaling  is  as  follows: 

1)  x  represents  the  epoch  revolution  number 

o 

2)  each  centimeter  represents  20  revolutions 


\ 
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3)  y  is  the  origin  of  either  a)  the  vector 
magnitude,  or  b)  At. 

a)  each  centimeter  represents  500  kilometers 
and  under  b)  each  centimeter  represents  5 
minutes. 

4)  x  should  be  5  centimeters  from  the  left  edge 
of  the  lined  graph  paper  and  should  be  9 
centimeters  from  the  bottom. 

5)  full  scale  is  then: 

a)  x  =  -100  to  +400  revolutions  from  epoch 

b)  Yyj^  =  0  to  4500  kilometers 

c)  y^  -  -  45  to  +45  minutes. 
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PREPINT 


v  PREPINT 

(Satellite  Situation  Report  from  Nodal  Elements) 


INPUT  DECK: 
INPUT  DATA: 


Manual  Schedule  Tape  Mode 


The  input  deck  should  be  in  the  following  order: 

1.  Request  Cards  (up  to  500)  in  the  following  format: 
Cols.  1  -  3:  Satellite  number 

7  Comment  indicator  defined  as  follows 

0,  no  comments  on  this  card 
1,  read  comments  contained  in  cols. 
21  -  62 


9-20:  Satellite  name 

21  -  62:  Comments  to  be  printed  if  col.  7 
contains  a  1  punch.  (A  max.  of 
50  sats.  may  have  comments) 

2.  Request  deck  terminator:  a  2  punch  in  col.  7. 

3.  Time  cards  (times  for  which  reports  should 
be  issued)  in  the  following  format: 

Cols.  1-4  Year 

6-7  Month  number 
9-10  Day  of  month 

11-17  Hours  and  minutes  (HHMM.  MM) 
20  Output  unit  indicator,  defined  as 

follows: 

0,  output  in  statute  miles 
1,  output  in  kilometers 

4.  Time  Deck  terminator:  a  7  punch  in  col.  8. 

5.  Standard  6  or  7  card  element  sets.  Only  the 
sets  required  are  stored,  therefore  more  than 
5  00  sets  may  be  included  in  the  input  deck. 

6.  Input  deck  terminator:  a  blank  card. 


OUTPUT:  Logical  tape  11  contains  the  satellite  name  and  number, 

element  number,  latitude,  longitude,  inclination,  period, 
apogee  distance,  perigee  distance,  revolution  number, 
time  of  node,  right  ascension  of  node,  longitude  of  node, 
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eccentricity,  height  of  satellite,  and  course* 
The  distances  may  be  in  kilometers  or  statute 
miles.  The  dimensions  are  determined  by  the 
option  selected  on  the  Time  card  (col.  20). 
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PREPINT 


Field 

Cols. 

1 

1-4 

Y  ear 

Z 

6-7 

Month 

3 

9-10 

Day 

4 

11-17 

Hours  and  minutes 

5 

20 

1,  output  in  kilometers 

0,  output  in  statute  miles 


Time  Card 
PREPINT 
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Field  Cols. 

1  1-3  Satellite  number 

2  7  1,  cards  contain  comments 

0,  no  comments 

3  9-20  Satellite  name 

4  21-62  Comments 


Request  Card 
PREPINT 

c> 
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P  RE  PINT 


JOb  TEST  PREPINT 

RUN  PREPINT5.0ATA 

4  58  ALPHA 

16  58  BETA  1 

5  58  BETA  2 

11  59  ALPHA  1 

12  59  ALPHA  2 

15  1  59  DELTA  INSUFFICIENT  OBSERVATION 

20  59  ETA 

22  59  IOTA  1 

23  59  IOTA  2 

112  1  59  MU  IN  HEL IOCENTR  ORBIT  450. 0D  1.317AU  .9766AU 

36  60  EPSILN  ? 

37  1  60  EPSILN  4  INSUFFICIENT  OBSERVATION 

43  60  ZETA  1 

45  60  ETA  1 

46  60  ETA  2 

47  60  ETA  3 

49  60  IOTA  1 

102  61  LAMBDA  2 

107  61  NU 

115  61  OM I  CRON  1 

167  61  RHO  4 

163  61  SIGMA  ? 

170  61  UPSILON 

182  61  OMEGA  1 

186  61 A  BETA 

18b  61  SIGMA  3 

2 

1961  10  11  1200 

1961  10  11  1200  1 

1961  10  11  1430 

1961  10  11  1430  1 

7 

4214  1  68 ALPHA  14740.  0.09500069  33.18999958 

4214  21961  280.80691970  1961  280.80691970 

4214  3  201.61903020  107.42337540  1.0"5476451 

4214  4  -4.96605333  7.42265104  0. 

4214  5  0.  -3.780903E-004  5 . 65 1232E-004  0. 

421  6  0.07371200  -1 .96 8034E-007 

4214  7 

5  78  158  BETA  2  13950.  0.18984776  34.24499,69 

5  76  21961  278.25430390  1961  278.25430390 

5  7b  3  0.09295403  193.98439300  94.50760521  1.10183595 

5  78  4-1. 4841 10E-007  -3.02018139  4.41471416  0. 

5  78  5  0.  ~  -9 • 8  9707 5 E-005  1 . 44669  3E-0  04  0. 

5  78  6  1.00000000  30.00000  0.  0. 

11149  1  59  ALPHA  1  11080.  0.16288486  32.84826871 

11149  21961  282.8732397^  1961  282.87323970 

H149  3  0.08698856  32.53621422  190.73210390  1.08936014 

11149  4  4. 736775E-008  -3.51236494  5.28651193  0. 

11149  5  0.  -  4.308964E-005-6.485486E-005  0. 

11149  6  1.00000000  30.00000  0.01525878  10.00000000 

12110  1  59  ALPHA  2  10100.  0.18352360  32.66509133 

12110  21961  279.61322930  1961  279.61322930 

12110  3  0.08993200  255.21911570  214.33844310  *-  1.08631547 

12110  4  1 . 999 180E-008  -3.30525151  4.99311847  0. 

12110  5  0.  1.568518E-005-2.369501E-005  0. 
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12110 

6  1,00000000 

30.00000  500 

0. 

0. 

015 

2 

1  59  DELTA'*  ' 

1007. 

.75239 

47. 

1 

015 

2 

21961 

8.851497 

1961 

015 

2 

3,498311195 

284,32 

171. 

015 

2 

4-  ,19237  E-04 

.309 

.3 

015 

2 

5  0. 

015 

2 

6  1.00000000 

30.  50.0 

16 

96 

158  BETA  1 

8710. 

0.20659353 

34.26000000 

16 

96 

21961 

283.30713240 

1961 

283 

.30713240 

16 

96 

3  0.09599846 

52.88917942 

133.76420490 

1.10247077 

16 

96 

4-1.934651E-007 

-2.84010604 

4. 15013865 

0. 

16 

96 

5  0. 

-1. 118959E-004 

1.635  09  lb-004 

0. 

16 

96 

6  1.00000000 

360.000009999 

0. 

0. 

AA - Aa 


i86  6  6  1.00000000  60.000009999  0.  0. 

188  1  1  61  SIGMA  3  700.  0.00765404  91.13000000 

188  1  21961  272.04341050  1961  272.04341050 

188  1  3  0.11193875  221.63437010  119.70460060  1.52613206 

188  140.  0.04354981  -1.10200445  0. 

188  150.  0.  0.  0. 

188  16  1.00000000360.00000  0.  0. 

ENDDATA 

ENDOFJOBR 
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MAKETAPE 

(Make  Input  Tape  for  TELTYP) 


INPUT  DECK:  Manual  Schedule  Tape  Mode. 

INPUT  DATA:  (1)  TELEFORM  punched  in  cols.  17-24. 

Used  if  the  message  is  to  broken  into 
90-line  segments. 

(2)  Data  cards  to  be  converted  to  teletype. 

(3)  FINDATA  punched  in  cols.  17-24.  Used 
to  terminate  the  data  deck. 


OUTPUT: 


Logical  tape  1 1  is  input  to  TELTYP,  See  writeup 
of  program.  The  tape  can  be  printed  using  data 
select  one.  The  output  will  consist  of  a  listing 
of  the  input  data  cards  with  the  sentinels  required 
by  the  TELTYP  program. 
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XYZLAR 

(Look  Angle  Report  from  x,  y,  z,  Coordinates) 


INPUT  DECK:  Manual  Schedule  Tape  Mode 

INPUT  DATA:  The  input  data  is  composed  of  sets,  or  units, 

each  of  which  consists  of  a  standard  station  card,  a 
'  request  "card,  and'  optional  ephemeral  data.  Ephem- 
eris  data  is  required  only  in  those  data  units  which 
initiate  a  new  vehicle  or  satellite  output.  The  source 
of  ephemeris  data  is  either  punched  cards  or  an  ephemeris 
tape  (unit  7). 

The  order  of  cards  for  an  input  data  unit  using  ephemeris 
cards  and  initiating  a  new  satellite  is  as  follows: 


(1) 

(2) 


Standard  Station  Card 

Request  card  specifying  time  parameters  for  the 
look -angle  computations  and  input/output  options 
Cols.  1-4  year 
day 
hour 


[base  time  of 

desired  look- 
► 

angle 

predictions 


Cols.  5-7 
Cols.  8-9 

Cols.  10-11  minutes 
Cols.  12-13  seconds 
Cols.  14-17  thousandths  of  secj 
Cols.  25-34  maximum  increment  of  time  from  base 
time,  for  desired  look-angle  predic¬ 
tions.  When  blank,  all  ephemeris 
data  will  be  used  to  generate  predictions. 

0  =  ephemeris  follows  on  cards 
1  =  only  output  of  visual  sightings 
desired 

0  =  output  of  all  sightings 
1  =  include  negative  elevation  sightings 
in  output 

0  =  positive  elevation  sightings  only  in  output 
Col.  47  Not  interrogated  by  program 


Col.  44 
Col.  45 


Col.  46 
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(3)  Vehicle  identification  card  containing  the  alpha- 
numeric  vehicle  name  in  columns  1—1 6-. 

(4)  Ephemeris  cards,  in  order  of  increasing  time 
increment  over  base  time. 

Cols.  1-14  time  increment,  in  minutes,  from 
base  time 

Cols.  15-28  x  coordinate  of  vehicle  position 
Cols.  29-42  y  coordinate  of  vehicle  position 
Cols.  43-56  z  coordinate  of  vehicle  position 

(5)  Blank  card  to  terminate  the  ephemeris  cards. 

(6)  Blank  card  to  terminate  program. 

This  set  or  unit  of  input  data  (1-5)  will  generate 
one  schedule  of  look-angles  for  the  vehicle  data  con¬ 
tained  on  card  types  3  and  4.  Additional  schedules  for 
different  stations  are  obtained  by  adding  station  and 
request  cards,  in  pairs,  after  the  blank  card  (5). 

To  obtain  schedules  for  vehicles  or  satellites  in 
addition  to  that  of  the  first  input  unit,  another  ephem¬ 
eris  card  set  (1-5)  is  required.  A  minus  sign  (-)  must 
be  punched  preceding  the  station  number  (cols.  1  -4) 
of  the  station  card.  Schedules  for  different  stations 
result  from  using  station  and  request  cards,  in  pairs, 
as  above. 

The  order  of  cards  for  an  input  data  unit  using  the 
ephemeris  tape  is  as  follows: 

(1)  Standard  Station  Card. 

(2)  Request  card,  as  above,  with  two  exceptions: 

Col.  44  l  =  ephemeris  tape  to  be  used 

Col.  47  1  =  punch  ephemeris  data 

0  =  no  ephemeris  card  output 

(3)  Blank  card  to  terminate  program. 
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Prediction  angles  for  additional  stations  for  a 
given  vehicle  are  obtained  by  adding  additional  station 
card-request  card  pairs  before  the  blank  card  (3). 

OUTPUT:  The  basic  output  is  a  schedule  of  predicted  look- 

angles  for  a  particular  station  at  specific  times.  The 
report  headings  are  the  satellite  name;  the  label  LOOK- 
ANGLES  FOR,  followed  by  the  station  name;  and 
headings  for  the  sighting  coordinates  and  time  data. 

Each  data  line  consists  of  a  day  of  year,  hour, 
minute,  and  fraction  of  minute  of  the  search  point;  the 
predicted  right  ascension,  declination,  azimuth,  and 
elevation  in  degrees;  the  predicted  slant  range  in 
kilometers;  and  the  elevation  and  illumination  angles 
of.  the  sun.  The  sun  data  indicates  if  the  satellite  will 
be  visible  at  the  time  and  location  of  prediction. 

In  addition  to  the  look-angle  data  output,  the  pro¬ 
gram  will  also  produce  punched  cards  containing  the 
satellite' s  ephemeris  data  in  the  format  of  the  ephemeris 
card  input.  The  punched  cards  may  be  obtained  only 
when  the  ephemeris  information  originates  from  ephem¬ 
eris  tape  input.  A  1  punch  in  column  47  of  the  first  request 
card  for  a  given  satellite  will  produce  one  set  of 
ephemeris  card  output. 
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Minute  8 

5 

12-17 
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6 

25-34 

Time  maximum 

7 

44 

1,  ephemeris  tape  data  input 

0,  ephemeris  cards  data  input 

8 

45 

1,  visual  sightings  only 

0,  all  sightings  desired 

9 

46 

1,  negative  elevations  permitted 

0,  only  positive  elevations  desired 

10 

47 

1,  ephemeris  cards  punched 

0,  no  punched  cards 

Request  Card 
XYZLAR 
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XYZLARS2  TEST 
XYZLARB2  t  DAT  A 

4040  9  002  601 5CHENEC TAD Y  NY 

11 


JOB 
RUN 

0026+428481-2859292 
1962239071919.000 
MARINER  JPL  3 

0.0000000+000  0.1261537+000  0.9894477+000-0.2643508+000 
0.3000000+002-0.2140776+001-0.5406414-001-0.1112388+001 
0. 60 OOoOC+002-0. 3555717+001-0. 1370979+001-0.1418331+001 
0.9000000+002-0.468 1876+001-0.2591086+001-0.1604181+001 
0 . 1 2 00000+u 03-0. 566 8458 +00 1-0. 37 3645 7+00 1-0. 1741359+001 
0. 15 uOO 00+003-0. 657 1 064+00 1-0 . 4827227+00 1 -0 • 1852486+001 
0. 18 00000  +  U 03-0. 74 168 36 +00 1-0. 58 7 65 45  +  00 1-0. 1947  488+0  01 


GE132  6016 


0.2100000+003-0.8221219+001-0.6893212+001-0.2031574+001 
0.2400000+003-0. 899 39 19+00 1-0. 7883390+001-0.2107805+001 
U .270 00 Ou +003 -0.9 7 4 1469 +001-0 .885 156 8+ 00 1-0. 2 178 128+001 
U.  3000000  +  003-0. 10468  50  +  002-0. 980  11  28  +  00  1-0'.  2243854+001 
0.3300000+003-0.1117842+002-0. 1073469+002-0.2305907+001 
0.3600000+003-0.1187383+002-0 • 1165433+002-0.2364962+001 


0.3900000+003-0.1255675+002-0 
0.42U0000+003-0. 1322879+002-0 
U. 45 00000+0 03-0. 1369125+002-0 
0.4800000+003-0.1454522+002-0 
0.5100000+003-0.1519158+002-0 
0.5400000+003-0.1583111+002-0 
0.5700000+003-0.1646443+002-0 
0.6000000+003-0 .1709210+002-0 
0.6300000+003-0.1771461+002-0 
0. 66 uCOOO+003-0. 1833237+002-0 
0.6900000+003-0.1894574+002-0 
0.7200000+003-0.1955507+002-0 


1256172+002-0.2421528+001 

1345823+002-0*2475995+001 

1434501+002-0.2528668+001 

1522302+002-0.2579795+001 

1609307+002-0.2629574+001 

1695589+002-0.2678168+001 

1781206+002-0.2725714+001 

1866213+002-0.2772325+001 

1950657+002-0.2818100+001 

2034578+002-0.2863120+001 

2118013+002-0.2907457+001 

2200996+002-0.2951173+001 


0.75 00000+003-0. 20 16063+002-0. 228 3555+002-0. 2994323+001 
0.7800000+003-0.2076268+002-0.2365717+002-0.3036952+001 
0. 8100000+003-0. 2 136 145+002-0. 24475 06+002-0. 3079 104+001 
0.8400000+003-0.2195716+002-0.2528945+002-0.3120815+001 
0.8700000+003-0.2254998+002-0.2610052+002-0.3162118+001 
0.9000000  +  003.-0. 2314010+00  2-0.2  6908  46  +  002-0.3  2  03  04  3+001 
0.9300000+003-0. 2372766+002-0. 2771343+002-0.3243616+001 
0.9600000+003-0.2431281+002-0.2851560+002-0.3283861+001 
0.9900000+003-0.2489567+002-0.2931509+002-0.3323800+001 
0. 10 2 0000+004-0. 2347 6 38 +002-0. 3011204+002-0.3363452+001 
0.1050000+0 04 -0.2605503 +002-0. 3090657+002-0.340283 4+ 001 
0. 1080000+004-0.2663173+002-0.3169880+002-0.3441964+001 
0.1110000+004-0.2720658+002-0.3248881+002-0.3480855+001 
0.1140000+004-0.2777965+002-0.3327672+002-0.3519522+001 
0. 1170000+004-0.2835103+002-0.3406261+002-0.3557977+001 
0.1200000+004-0. 2892080+002-0. 3484657+002-0.3596231+001 
0.1230000+004-0. 29489 03 +002-0. 356 28 68+002-0. 3 6342 95+001 
0.1260000+004-0.3005577+002-0.3640900+002-0.3672179+001 
0.1290000+004-0 .306 21 10+002-0 *371876 1+002-0 .3709891+001 
0. 1320000+004-0.3118506+002-0.3796457+002-0.3747441+001 


45 


0337+189167  +  1556833  1372  611  SOUTH  POINT  ( HAW  I  I )  111  031061  4S 

1962239071919.000  11 

MARINER  JPL  3 


ENDOFJOBR 


ENDDATA 
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XYZLAK 


Ht-PBHBHBHfihaBBHe 
w«RXrvE«  jPL  3  * 


LUOK 

IUV 

ANGLE'S  TOh  rCh^NECT A Py  lyy 

Tint  .  k.a.  oec 

* 

aZIn  £l£ ' 

RaN’GK 

SUNS  tllumi* 

z 

DKG* 

arc 

A  N  k  .  A  M  G  , 

km. 

EL&V  NATION4 

'?3? 

124 .943 

'42.163 

11?.*20"'‘2.7<9 

®94j. 

-27. « 

20.0* 

74P.32 

105,735 

-32,097 

46>V34-75.3“'3 
lj  .57B-.71.611 

-24,1 

no. 3* 

?3<? 

PJ.9,32 

SfO  1 1«55 

-24.755 

319Q9, 

-19,9 

ill. 5* 

239 

»<9,  J2 

209. ^93 

-20,551 

9,Sl‘>-67.4‘’7 

*1*38  , 

-15,3 

110,4* 

239 

“19,32 

VIA, 122 

*  t  7  ,  02  9 

lB.DlB-M.S'Cl 

60369. 

-10,4 

109, 4* 

949 ,32 

21 7.2V? 

-1 5 , 9  f<  9 

i?,t>lS5-6x  <,3 

68047 . 

-5,4 

1  ”  8  *  6  * 

239 

1019.32 

?l9f*3e 

-14,474 

Jl ,  1  91*66 ,  3-0 

6696J, . 

-0.1 

100, Q* 

239 

1 " 4  9 , 32 

221 .44* 

-13.356 

39 ,  383*'l4 , 9  -1 

747/2, 

5.3 

1U7,!>* 

?39 

1119.32 

?29*H9? 

.12.458 

47 • U63«Bi • 1  7 

P2321 . 

in .  e 

1  u  / ,  0  * 

?»>« 

1149.32 

224 , 067 

-11,719 

54,128-46,9  ’8 

89041 . 

16.2 

1U9.6* 

23« 

1719,32 

225 , U  30 

-11.099 

6n.  594-*g. 3*2 

96761 . 

21.7 

106,3* 

?39 

1249,32 

225. *4* 

-10.570 

66,537-  l7.5-'3 

103701. 

27,2 

l’)6, 0* 

?3« 

131°,  32 

226.5>25 

•10,153 

7?. 05n-i2. 5-2 

110*83 , 

32,5 

105.6* 

?3« 

1349,32 

227,093 

-9.7j3 

/7.22V-P7.3-9 

117126, 

37,6 

105.6* 

?39 

1*19,32 

227,500 

-9.359 

»2, 164-72 . 0  >7 

123645, 

42.4 

105,4* 

?  3  9 

1*49,32 

227,962 

•9.044 

86. 943  -1  6, 6  '5 

170961! . 

46,9 

105,2* 

V3& 

1K1°  ,32 

228,207 

•8,759 

9l  .636-11. 1?1 

136'8*. 

5  0 , 0 

105,1* 

?3? 

lh4  9  ,J2 

?2p*592 

*M  ,5n  2 

*6,327  -5.6-2 

1*2* 36 , 

54  ,  o 

104,9* 

?39 

1*19,32 

?2P ,764 

-0,266 

101..086  .0.2  16 

148027, 

56,1 

104.0* 

?39 

1*40,32 

22ft*929 

•0  !  fi49 

105.989  5 . 1  '6 

154®  7* ! 

57,2 

104,7* 

?J>u 

1719,32 

229 , G54 

-  7 , 8d  8 

111.116  10.4(8 

161' 92, 

56.9 

1 U  4 , 6  * 

?3<5 

1749,32 

229.145 

"7(66i 

116. 55i  i&.B'Jfc 

167,9*. 

55.3 

1 0  4 , 5  ♦ 

239 

1«1°,32 

229,206 

-7  4  P  6 

122,386  ^u.463 

17379,  , 

52,7 

104,4* 

239 

1049,32 

229,242 

-7|321 

126,706  25.0-9 

179397 , 

49,2 

104,3* 

239 

1919 ,32 

229 , 259 

•7,165 

135,61*  vy.2-9 

1P5621. 

4  5 , 0 

104,2* 

23« 

1940.32 

229,260 

-7.016 

143,177  <2.978 

161*73, 

40,4 

104,2* 

239 

2ni9 ,32 

22c  *  2A* 

-6,875 

l5lt434  '6,o>3 

1 V  7  P  6 1  , 

35.4 

11*4,1* 

239 

2049,32 

229,229 

-6.740 

160.859  <d.4-l 

2  0  4  n  9  2  , 

30,2 

104,0* 

230 

21  19,32 

229,205 

-6,61  1 

169,833  * 0 . 0  '2 

2l  0377, 

24,8 

104,0* 

?39 

2.l4o,32 

229,160 

•6 , 4p  7 

1/9.641  '-0.6*4 

216704. 

19,3 

103,9* 

?3  o 

2219 .32 

?29 . 156 

.6.368 

189.499  "0.3*2 

223 "9 !i . 

13.8 

103.9* 

209 

2249,32 

229 , 136 

-6,264 

199,310  <9. 007 

279*37 , 

8,3 

103,9* 

?  3  o 

2310,32 

229*122 

•6,144 

200.239  -'6.9/2 

236029. 

2.9 

103,0* 

?09 

2349.32 

229,116 

-6  .  [J 3 8 

216,741'  ->4 . 1  '4 

242570, 

-2.5 

1 0  3 , 8  * 

?4P 

10,32 

229,119 

•  5,936 

224,563  -'0.6  2 

2*9176, 

-7.7 

103,7* 

?*P 

49.32 

229,134 

-5,838 

23j  ,736  7 6 , 5 4 

255016, 

-12.7 

103,7* 

2*0 

11°, 32 

?  29 , 16  n 

-5,743 

23R.326  72,156 

262*96, 

•17,5 

103,7* 

2*p 

149,32 

229,196 

•5,663 

244  , *26  1 7 , 4  il 

7  6  9  7  0  9  , 

•22.0 

103,7* 

?4n 

210,32 

229,249 

-5,566 

25n  1 135  ’  2  474 

275044. 

-26,0 

103.6* 

2*r« 

249,32 

229  ,;<13 

-5.482 

255.549  7. 21 

282*94 . 

•  29,6 

103,6* 

2*  n 

310,32 

229 , 389 

-5.4n3 

260,764  1,076 

249*50  . 

-32.7 

103,6* 

?*  n 

349,32 

229,477 

-5,326 

•265,870  * 3 , 3 '■  2 

296702. 

•  35,0 

103,6* 

2*  n 

*l’  ,32 

229.S76 

-5,263 

27 n , 959  »8.7>(j 

3n2®4,  . 

•36,5 

1  u  3 . 6  * 

?*o 

*49,32 

229,606 

•5.184 

2/6,123*14 ,1*4 

3n9*5B , 

-37.2 

103,5* 

24n 

■>19,32 

229,605 

-5.U7 

2*1, *61-19. 489 

3 1  6  3  *  2 , 

-37,1 

103,5* 

2*0 

54 ®  .  3 2 

229,933 

-5.Q5  4 

287, 083-74. 6*7 

322086, 

*36,0 

103.5* 

?*n 

hi o ,  32 

23(1.067 

-4,994 

293,111*29.7  7 

3?9«75, 

*34,1 

103, 5* 

2*  n 

*49,32 

230,^08 

.4,938 

296.689.  '4 ,51 1 

3361.14  . 

-31.5 

1  o  3 , 5  * 

2*o 

719,32 

230.353 

.4,884 

306,970*38.907 

342684. 

-28,2 

103.5* 

2*0 

749,32 

230.500 

•4,833 

315,112*43.073 

3*8983, 

*24,4 

103,5* 

?*n 

*19,32 

230.649 

.4.704 

3  24, 249. *6, 400 

355306 . 

.20.2 

103.4* 

2*0 

*49,32 

230,799 

-4,739 

334,429*49,1>7 

361645, 

*15,5 

103,4* 

2*  n 

919.32 

230*946 

•4,696 

345.544*51 . 0  <8 

367?un. 

-10.7 

103,4* 

2  *  r 

940,32 

231,091 

*4,655 

357,274-51,7/7 

373769, 

*5.6 

103,4* 

2*0 

1*19,32 

231.231 

-4,616 

9,119-61.4(6 

379751. 

-0.3 

103.4* 

240 

1*49,32 

231 ,366 

- 4  #  58  0 

20,540.60,012 

385*46, 

5.1 

103,4* 

24  n 

1110, 32 

231,495 

•4,546 

31, 134-47.614 

3°1456, 

10,6 

103.4# 
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POSE 


INPUT  DECK: 
INPUT  DATA: 


OUTPUT: 


POSE 

(Point  Search  Ephemeris) 

Manual  Schedule  Tape  Mode 

( 1 )  Request  card: 

Cols  1—5:  T- start  in  minutes  (DDDD.  ) 

(minimum  period  expected) 

Cols  6  —  8:  A  t  in  minutes  (DD.  )  (time  increment 
used  to  increase  period) 

Cols  9  —  13:  T-stop  in  minutes  (DDDD.  ) 

(maximum  period  expected) 

Col  14  output  options: 

1  =  long  form  requested 

2  =  short  form  requested 

(2)  Standard  Observation  Card 

(3)  Standard  Station  Card(s) 

(4)  Option  Card: 

Cols  1—4:  — 1  =  read  another  unit  of  input  data 
(cards  1  —  4) 

0  or  blank  =  terminate  program 

Logical  tape  11  contains  a  table  of  look-angles, 
for  each  station  requested,  in  either  long  or  short 
format.  The  short  form  of  output  consists  of  look- 
angle  information,  time  of  crossing  in  days,  hours, 
and  minutes  of  Zebra  time;  elevation  and  azimuth  angles 
and  slant  range  in  kilometers.  The  long  form  includes, 
in  addition,  the  Cartesian  coordinates  of  the  station  and 
object. 

The  TELTYP  program  may  be  used  if  teletype 
transmission  is  required. 
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r 


Field 

Cols. 

1 

1  -  5 

T-Start  in  Minutes 

2 

6-8 

At  in  Minutes 

3 

9-13 

T-Stop  in  Minutes 

4 

14 

1,  Long  Form  of  Output 

0,  Short  Form  Output 

Note: 

Decimal  points  may  be  punched  anywhere 
in  each  of  the  first  three  fields. 

Request  Card 
POSE 
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POINT  SFaPCH  PROGRAM 

af»TI0iM  L*TlTUpr  =  7615638  L  INGItUDE  ■  %9± l*3?2  £.AST__  H£I3HT_«  149.  METERS 
OBSERVED  time  »_  'is.  DAY?  IP.,  HOURS  17.  mImUtCr  47.40  SECONDS  DMT 
ELEVATION!  a  ft4^ftQofl  A  7 1 M  U  T  H  *  2.9rjf)fi  RANGE  »  3 0 3  1 1)  KM/H 

jWtjAO  a  311.22012  DFGPEFS 
lHtTAS  ■  242;90932  DEGREES 

CflPR  »  6358.21ft 

GrOCENTPm  STATTtNi  LATITUDE  a  1.33477  »aDIAVS  -  -  - 

XT  =  549.491  EtA  *  -J3H1.5A9  EFT  A  s  6181.929  KM 

OECL  p  1  ,35^9  PA  «  0,9961  RAnlAvjS  ~  1 

CAPX  ■  -ft 77.11)4  CAPy  r  -1323^708  CiPZ  3  6181.929  Km 

T ME  COOP  DTN  AT pS  ip  THp  POINT  t\|  ThF  INITIAL  RfFE^CE-5 YSTpM  APf 

X  *  -*01.181  T  »  -1268.23ft  2  ■ _ M77.6J4  KM* 


8hPbEBB0PrfRtJR0Bfl  ft  lft 

+ 

* 

T H|  !lF  GREEmlAnOBm^Ws _ ft u _ UNlnENTlPIEO  ,ECT* 


Ffe«A 

f  T  m  r 

Flr7 

'AZTM 

R  AM*r* 

AY 

HR 

MtN 

am-; 

Ang  , 

KM* 

Stt 

11 

*7*79 

25. 7 

294.  ft 

584* 

5b 

11 

42,79 

24  ,  ? 

293  .8 

5 1 1  * 

5b 

11 

4  7.79 

22.  a 

293. ft 

638* 

5  b 

11 

52J9 

9J..  ft. 

293  .ft 

6^5* 

5  b 

11 

57i79 

?0.  4 

293. ft 

693* 

12 

2.79 

19^ 

293  ,ft 

791  * 

t* 

12 

7,79 

18*  t 

293.7 

75ft* 

5  b 

12 

1  2.79 

17*4 

293.9 

778* 

5  b 

12 

17.79 

1 6 .  *5 

394.1 

Sflft* 

5° 

12 

22.79 

15. <* 

294 .3 

S38* 

f  8 

1ST 

~?y  ,79~ 

14.  * 

‘"  '5 9ft  ,5 

5ftT* 

♦  U. 


PBPEPdBBPoPBRRPB  65f 

* 

ft 

TOMSK  USSR  *50  UNinE^TirTED  OBJECT* 

4 F r P A  TIME  Fifty  AZTM  RaNOF* 

day  hr  min  am»;  ang. 

NO  vISUAt  PAggF s* 

* 


Bb  R  b  b  B  B  0  P  HP  3  B  0  ft  R  561 

♦ 

♦ 

S0MI3RE8TR0M  ■  AFR  BRAIL  ?ftl  UNIDENTIFIED  OBJECT* 

"TTWTTTTmf  fTF/ — T7ifl - RTNftp* 

U AY  HR  MTN  AM^i  ANG,  *M* 

no  visual  passes* 

*4 
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INPUT  DECK: 
INPUT  DATA: 


OUTPUT: 


ORPS 

(Orbital  Plane  Search) 

Manual  Schedule  Tape  Mode 

The  input  data  is  in  units  consisting  of  an  element 
set,  a  station  card,  and  a  request  card.  Any  number  of 
units  may  occur.  The  last  unit  must  be  followed  by  a 
blank  card  to  terminate  the  program.  Each  unit  will 
consist  of: 

(1)  Standard  element  set  (6  or  7  cards) 

(Z)  Standard  station  card 


Request  card: 

Cols.  1-10: 

Start  time  of  search  (days  of  year) 

11-20: 

Time  increment  between  search  points 

(minutes) 

21-30: 

End  time  of  search  (days  of  year) 

31-40: 

Observing  station's  search  azimuth 

angle  (degrees) 

41-47: 

Station' s  maximum  slant  range 

(kilometers) 

48-57: 

Station' s  minimum  elevation  angle 

(degrees) 

58: 

1  punch— visible  passes  only. 

(4)  Blank  card,  will  terminate  the  program.  The  card 
should  follow  the  last  repetition  of  (1)  to  (3). 

The  search  point  data  for  a  satellite  is  preceded  by 
the  satellite  elements,  request  information,  year  con¬ 
stants  used  in  the  calculations,  and  the  station  data.  Each 
line  of  the  search  point  data  consists  of  the  year,  month, 
day,  hour  ana  minute j  the  right  ascension,  declination, 
azimuth  and  exevation  in  degrees;  the  slant  range  in 
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ORPS 
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kilometers;  and  the  elevation  and  illumination  angles 
of  the  sun  in  degrees.  The  information  is  in  order 
of  increasing  time  during  the  range  requested.  If  only 
visible  passes  were  requested,  a  check  is  made  and 
only  visible  points  will  appear  in  the  output. 


Wolf  Research  and  Development  Corporation 


ORPS 


1  1-10  Start  Time 

2  11-20  Time  Increment 

3  21  -30  End  Time 

4  31-40  Search  Azimuth 

5  41-47  Maximum  Slant  Range  in  Kilometers 

6  48-57  Minimum  Elevation  Angle  in  Degrees 

7  58  1,  Visual  Passes  Only 


Request  Card 
ORPS 
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JOB  0RPSB2 


RUN 

33  13  160  GAMMA  3 
33  13  21960 


ORPSB2.DATA 

1100. .024445879 
176.37720871  1960 


33  13  3  .064978 
33  13  4-5.30746 
33  13  5-0. 

3  3  1  3__q_Q_* 
0300+107330+0616 
190.916670  10. 


00  291.27649 

1GE-09-  4.9070522 

E-  -0.  E- 

0. 

000  140  5  030001 

191.  .'33333  120. 


166.96225 
3.7491586 
-0.  E- 

0. 

TR  I  ND'AD 
4000. 


51.287999 
176.37720871 
1.04471998 
-4.1834998 

-0. 

0. 

159 

0. 


ENDDATA 

ENDOFJOBR 


5-11-4 


m  rn 


Wolf  Research  and  D+veiopma  nt  Corporation 


ORPS 


OR^ITAI  °LAur  SMHCH  ANU  XY  LDUK  ANGLE  PROQRaH 


sat  no;  33 
Oh b i f  ml  elements 
u ,  1 7  6  u  a  n  o  n  +  g  o  x 


ci-  , 165Sol7*^uu6 
t  .  1609622*5  +  003 


El  EM  NO,  13* 
U.577PO8/1+O0O 

u.uocnuorjo  +  oou 
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ASUM 


INPUT  DECK: 
INPUT  DATA: 
OUTPUT: 


ASUM 

(Acquisition  File  Summary) 


Manual  Schedule  Tape  Mode 
SEAI  Tape  (A-File) 

The  output  consists  of  the  information  contained 
in  the  A- File  of  the  SEAI  tape.  The  output  is 
sequential  according  to  satellite  number  and 
includes  satellite  number,  sensor  number,  sensor 
name,  pass  code  (all  or  visual),  format  request 
(short  or  complete),  type  (all,  3-point,  Baker-Nunn), 
minimum  azimuth,  maximum  azimuth,  minimum 
elevation,  maximum  elevation,  maximum  range, 
and  step  size  in  minutes. 


ASUM 


Wolf  Research  and  Development  Corporation 


v,a. 

o  >- 


fr>  K5  fo 


n  v- 


.  (X 

'»-  W  CO  O)  CO  CO 

H-  X  *jj  liJ  UTUI 

m  z:  >-  >•  *-!>- 


o  o 

Z  55 


o 

rr 


3f; 

O: 

O’ 


o  c> 

-X  -» 


I 

j 

f 


i 

uj; 

M  CO 
M  UJ 
CO 


Q  Z 

>-!  k-l 

t  r 

’JJ 


o  o 
o  o 

13  <3 


o  o 

<3  <3 

o  o 
o  c* 


CM 


rv 

■> 

r> 


x  00 

<  o  o 

X  00 

,flc  'O  o 

3  3 

VI 

*-  x  cr  o- 

*-<  <r,  rr  cr 

se:  V  =j-3 

T 


o  o 
o  o 
■0-0 
3  3 

3  o 
<>  o> 

*3  3 


o  co 
o  o 
o  o 
3 


o 

o 


CD  OO  * 

O  0-0  *• 

D  3  3' 

*’UJ 


3  ? 

O  M 


3  *3 


33  33  3 

.3  *3  3  3  3 


3 

3 

O 


n 

x  c  c 

*  o  o 

3  »;  -o  ro 

ci  « 


cr  c 


o  .0 
•O  ~o 


o 

D 


V 

sO 

$ 

o 

r-» 

I 

>. 

O 


T  O 
n  t 
n 


o  r 
t  n 
71  o 


o  r 

T  3 

V'  O 


n  j  'n  „j  vi 

•n  3  _j  h  j  — < 

<*  O  <  ■>  <  > 

cu  o 


_j  fn 


'n  j  n  .  * 


■>  <  >  * 


UJ 


u>  U*  UJ  * 


3  ju« 

■n  -r 

z.  < 

UJ  z 

cr 


CO  CO 

<  trr 

X  X 

It)  I  ..I 

m  r_  t~  c 

<1  <r 

c  c  c  a 

O  M  O’  M 

U  Z  Ul  ? 

a:  m  cr  m 

^  r?  <r  r 

-  V- 


d  * 

- 1  * 


'o  *0 

3  0.  J 

7  r  7 

c  U. 

CO  J-  CO 


'0  7* 

O  O  LL 

7  7  T 

<j  «c  u 

CO  CO  M 


U*  iT 
k-  Ll 


CO 


tr  »  w 

z  c:  w  c 

uj  z  or? 

CO 


cr  ’c 


ro  cr 
cj  ro 


c\  V 

IN  O 


(V  V 

r»  o 


o 


to 


r  f  v 

«*  z  cc 

CO  C  c 


rr  *5  nT 

r?  r:  ^ 

C  C  CD 


r>  «*-  «S 

r-  or  cc 

<D  C  CD 


c 

a 

< 


5-12-2 


Wolf  Research  and  Development  Corporation 


SSUM 


INPUT  DECK: 
INPUT  DATA: 
OUTPUT: 


SSUM 

(Sensor  File  Summary) 


Manual  Schedule  Tape  Mode  . 

SEAI  Tape  (S-File) 

A  listing  of  the  sensor  data  contained  in  the  S-File 
is  provided.  The  output  includes  sensor  number, 
sensor  name,  latitude  in  degrees,  longitude  in 
degrees,  height  in  earth  radii,  x/  cos  0  or  -(C  +  H) 
cos  0  in  earth  radii,  z  or  -(  S  +  H)  sin  c(>  in  earth 
radii,  accuracy  digit  for  azimuth,  elevation  and 
range,  classification,  teletype  request  code,  and 
sensor  type. 


5-13-1 


SSUM 


Wolf  Research  and  Development  Corporation 


■o  a  .0  o  n  o  o  c 


->->->•  >->->->-  v- 


7  Z  X  ^  «  Z  Z  ^  Z  * 


Z  Z  Z.  Z  Z  2  Z  Z  Z  Z  z  Z  z  z :  J5 


2  Z  Z  Z  Z  Z  Z  Z  Z  Z 


^  r4  W 
O  O  O  *3  O  O 

4  o  o  o  Cr  a 

a:  i  »  i  i  i 

■O  CO  "3  f\)  H 
T  O  M  3  "'5  ft* 

*—  's..  ^  n  o  o 


o  o  3  o  <3  o  o  o  o  o 

O  G  G  3  G  ooooo 

<r  'ft  n  o  ip  o  o  p.  ®  ® 

.  -S  P  f*  t)  fl  H  >  N 

o  a  >  ■»  n  vv  n  h  ft 


I  t-1  -f— (  W  »-4  *4  w-i  w~t  *-t  «— (  *4  wt  W 

>  a  o  q  001*0  0  o  o  o  o  o 

I  G  o  o  oocoo  o  o  a  a  o 

til  r  I  I  I  i  iiiii 

>  rv.A  ?0000»-»  ■OfOWvDlT* 

iVITZl  ?•>>-*  »  TS  >.  <•  o  -O  .Ti 

>  >.  -J  ift  o  >  o  ft  >  n  a-  r  *M 


1  i  i  f  i  ii 

ti  \  t.  "ft  v  -a  .rv  ' 

1  S  'ft  -V  A)  ^  1 

o  -v  r>  *■*  ft*  >  «v 


iiiii 

t  -v  r,  v  x 

n  r.  >  :  o 

PS  i  t  : 


i  i  till 

r.  t  V  'x  >  > 

r  >  "  o  c  n 

f\  f\  ft)  r-t  3  jG 


\j  V  U.  4 

o  o  o  o  ,-a 

O  O  *3  0  0 

4  4  4  4  4 

-v  ft  ^  ^ 

4  ft  Ti  ft  \ 


\  \|  \  V  .ft 

O  O  O  O  -3 

o  o  o  o  o 

4  4  4  4  4 


M  V  A  L 

0  3  0  3  0 

o  o  o  o  o 

4  4  4  4  4 

^  T  *s  -\l  > 

H  ff  ft  «  O 

-K  >  -  v  a 


0  0  0  3  0 

O  O  *5)  l3  O 

4  14  4  4 

-I  "’.I  .'s.  ^  ftT 

■*  n  s.  r*  r 

\ 


M  V  \l  H  .-I 

0  0  0  3  3 

o  o  a  o  o 

4  >  *  4  4 

-I  *■*  *v  o 

>  .  ft  ;  ft 


3  0  0  0  0  0  0  3  0  0 

OOOOO  000(00 

441-44  44444 

*ft  ft  r  4  ^ 

"•  ?  v  n  ^  v  .n  -v 

^  p  >»  r  r  ^  _  ■  i-  *-■ 


-4  4  — I  «4  ,4 

O  O  r~t  O  3 

O  O  O  O  O 

4  4  4  4  4 

r4  ON  IP 
ftT.  iP  *s*  V  3' 


O  O  o  o  o 

0  0  0  0  3 

4  4  4  4  4 

OiCN  O  rl 
t-l  •*  <  *  -C 
~i  r  «  '• 


-1  .4  rl  4  ^  -4  (4  r4  4  3 

3  non  «  ooooo 

(30000  00  300 

44444  44444 

r-lTiPOlPPI  O  ♦  O  ♦  ftT 

‘ft  (ft  ft  ft  C  O  O  ft*  '/»  ft's 


o  o  r  3  o 

o  o  o  o  o 

4  4  4  4  4 

a)Nt  t  N 
C\J  P  *T  r<!> 


ooaoc*  ooooo 

44441  44444 

as  qcj  ->  pj  4)  rv  cm  ,  ♦  «*-  + 

fo  ft-  *r  ft  pc  Nft:  wh  ft 


<  a 

'iv  r 
r-  t r  v 
*/  t~  r*  u  «' 


*  u,  >-  c  u 

o  z  v  u;  i 

*7  <j  r  rr  *i 


fZ-tZHI—  4  j  h  a  O' 

_hHKa  ar—'r-oi- 

u  **  a  u  i* 

J  J  ~  :  :■  !/  Q 


>  ^71  3CJJI- 

CK  -ft  ^  4-  J*  -2  o.  cn  v 


<1  ft  7  fl  ft" 

U  Z  H  D  4 

_■  *  o  x  m 

r.  <  a  c  - 


CT  ^  4-  > 

<  •-  z  r 

■  <r  ?  <-  i- 

,  ■:  V  ft  U 


3-  cr 

a  c  u.  *-*  <\  k  r,  *9 

ctft'f  cecrfft'fft 


ooocrcr 
T“  c\  c\.  c  t\ 
%\  c\  i'  ■'  ■■*/ 


S-1 ^-2 


ISUM 


Wolf  Research  and  Development  Corporation 


INPUT  DECK: 
INPUT  DATA: 


OUTPUT: 


ISUM 

(Information  File  Summary) 

Manual  Schedule  Tape  Mode 

(1)  SEAI  Tape  (I-File) 

(2)  Request  cards  with  any  of  the  following 

entries  punched  in  columns  1—3: 

(a)  Three  decimal  digit  satellite  number. 

Any  number  of  cards  may  be  used  to 
request  specific  satellites. 

(b)  ALL  The  ALL  punch  requests  all 
satellite  information,  replacing  request 
card  type  (a). 

(c)  BOX.  The  BOX  punch  will  provide  a  box 
score  of  still  orbiting  satellites  as  addi¬ 
tional  output. 

(d)  END.  The  END  punch  signals  the  end  of 
request  deck,  and  must  be  used  as  part  of 
the  input  deck. 

The  I-File  of  the  SEAI  Tape  is  written  for  off-line 
printing.  Information  printed  out  includes  satellite 
number,  satellite  name,  launch  date,  launch  site, 
booster  country  and  payload  country. 
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INFORMATION 
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SUMMARY 


09-10-62 


0927.fr 
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information  summary 


09-10-62  0927.8 


sat.  number 

CLASSIFICATION 
CODED  SAT.  NAME 
IWTFRNAT’L  code 
common  name 

LAUNCH  DATE 

launch  site 

launch  AGENCY 
BOOSTER  country 
payload  country 

MISSION 
WEIGHT  (KG) 
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TELTYP 


TELTYP 

(Teletype  Output  Conversion) 


INPUT  DECK: 
INPUT  DATA: 


OUTPUT: 


Manual  Schedule  Tape  Mode. 

Tape  1  i  is  scanned  for  sentinels  marking  the 
beginning  and  ending  of  messages  to  be  converted 
to  teletype  code.  All  appropriately  marked  mes¬ 
sages  will  be  converted. 

Sentinels  used: 

1.  BBBBBBBBBBBBBB  (14  B's):  this  sentinel 
marks  the  beginning  of  a  message  to  converted. 

2.  *  $  :  the  asterisk  followed  by  a  dollar  sign 
marks  the  end  of  a  message  to  be  converted. 

Tape  11  contains  the  data  converted  to  Baudot 
code  following  output  previously  written  on  the 
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BMEWSPT 


INPUT  DECK: 
INPUT  DATA: 

OUTPUT: 


BMEWSPT 

(BMEWS  Paper  Tape) 

Manual  Schedule  Tape  Mode. 

Tape  0  should  contain  the  O  point  data  from 
the  DIP  as  described  in  the  writeup. 

Tape  7  will  contain  observation  information 
in  the  standard  format  required  for  input  to 
ORCON. 
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BMEWSPT 


INPUT  DECK: 
INPUT  DATA: 

OUTPUT: 


BMEWSPT 

(BMEWS  Paper  Tape) 

Manual  Schedule  Tape  Mode. 

Tape  0  should  contain  the  O  point  data  from 
the  DIP  as  described  in  the  writeup. 

Tape  7  will  contain  observation  information 
in  the  standard  format  required  for  input  to 
ORCON. 
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